koalemos 0.0.1

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Tal Atlas
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,17 @@
+= koalemos
+
+Description goes here.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2009 Tal Atlas. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,45 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "koalemos"
+    gem.summary = %Q{Some extensions for me in all my projects}
+    gem.description = %Q{Nothing here you'd be interested in}
+    gem.email = "me@talatlas.com"
+    gem.homepage = "http://github.com/Talby/koalemos"
+    gem.authors = ["Tal Atlas"]
+    gem.add_development_dependency "rspec", ">= 1.2.9"
+    gem.add_development_dependency "yard", ">= 0"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+require 'spec/rake/spectask'
+Spec::Rake::SpecTask.new(:spec) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.spec_files = FileList['spec/**/*_spec.rb']
+end
+
+Spec::Rake::SpecTask.new(:rcov) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.pattern = 'spec/**/*_spec.rb'
+  spec.rcov = true
+end
+
+task :spec => :check_dependencies
+
+task :default => :spec
+
+begin
+  require 'yard'
+  YARD::Rake::YardocTask.new
+rescue LoadError
+  task :yardoc do
+    abort "YARD is not available. In order to run yardoc, you must: sudo gem install yard"
+  end
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.1

data/koalemos.gemspec

@@ -0,0 +1,71 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{koalemos}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Tal Atlas"]
+  s.date = %q{2009-12-26}
+  s.description = %q{Nothing here you'd be interested in}
+  s.email = %q{me@talatlas.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "koalemos.gemspec",
+     "lib/koalemos.rb",
+     "lib/koalemos/beginning_of_day.rb",
+     "lib/koalemos/blank.rb",
+     "lib/koalemos/commaify.rb",
+     "lib/koalemos/friendly_time.rb",
+     "lib/koalemos/full.rb",
+     "lib/koalemos/hash_union.rb",
+     "lib/koalemos/num_to_time.rb",
+     "lib/koalemos/odd.rb",
+     "lib/koalemos/rand.rb",
+     "lib/koalemos/round.rb",
+     "lib/koalemos/symbol_to_proc.rb",
+     "lib/koalemos/try.rb",
+     "lib/koalemos/uniq_by.rb",
+     "spec/koalemos_spec.rb",
+     "spec/spec.opts",
+     "spec/spec_helper.rb"
+  ]
+  s.homepage = %q{http://github.com/Talby/koalemos}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{Some extensions for me in all my projects}
+  s.test_files = [
+    "spec/koalemos_spec.rb",
+     "spec/spec_helper.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<rspec>, [">= 1.2.9"])
+      s.add_development_dependency(%q<yard>, [">= 0"])
+    else
+      s.add_dependency(%q<rspec>, [">= 1.2.9"])
+      s.add_dependency(%q<yard>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<rspec>, [">= 1.2.9"])
+    s.add_dependency(%q<yard>, [">= 0"])
+  end
+end
+

data/lib/koalemos.rb

@@ -0,0 +1,6 @@
+files = Dir.glob(File.join('.','lib','koalemos','**','*.rb'))
+files.each do |f|
+ require f
+end
+
+include Koalemos

data/lib/koalemos/beginning_of_day.rb

@@ -0,0 +1,14 @@
+module Koalemos
+  class ::Time
+    unless method_defined?(:beginning_of_day)
+      def beginning_of_day
+        ::Time.mktime(self.year,self.month,self.day)
+      end
+
+      def self.beginning_of_day
+        t = ::Time.now
+        ::Time.mktime(t.year,t.month,t.day)
+      end
+    end#unless
+  end
+end

data/lib/koalemos/blank.rb

@@ -0,0 +1,67 @@
+module Koalemos
+  module Blank
+    module Object
+      def blank?
+        respond_to?(:empty?) ? empty? : !self
+      end
+
+      def present?
+        !blank?
+      end
+    end
+
+    module NilClass
+      def blank?
+        true
+      end
+    end
+
+    module FalseClass
+      def blank?
+        true
+      end
+    end
+
+    module TrueClass
+      def blank?
+        false
+      end
+    end
+
+    module Array
+      def self.included(modul)
+        modul.module_eval do
+          alias_method :blank?, :empty?
+        end
+      end
+    end
+
+    module Hash
+      def self.included(modul)
+        modul.module_eval do
+          alias_method :blank?, :empty?
+        end
+      end
+    end
+
+    module String
+      def blank?
+        self !~ /\S/
+      end
+    end
+
+    module Numeric
+      def blank?
+        false
+      end
+    end
+  end
+
+  unless Object.respond_to?(:blank?)
+    for k in Blank.constants
+      Object.const_get(k).class_eval do
+        include Blank.const_get(k)
+      end
+    end
+  end
+end

data/lib/koalemos/commaify.rb

@@ -0,0 +1,19 @@
+module Koalemos
+  class ::Numeric
+    unless method_defined?(:commafy)
+      def commafy
+        to_s.reverse.scan(/(?:\d*\.)?\d{1,3}-?/).join(',').reverse
+      end
+    end
+  end
+  
+  class ::Float
+    unless method_defined?(:commafy)
+      def commafy
+        to_s.gsub(/\d+\./) do |s|
+          s.reverse.scan(/(?:\d*\.)?\d{1,3}-?/).join(',').reverse
+        end
+      end
+    end
+  end
+end

data/lib/koalemos/friendly_time.rb

@@ -0,0 +1,45 @@
+require File.join(File.dirname(__FILE__),'num_to_time.rb')
+
+module Koalemos
+  module FriendlyTime
+    def friendly(since = Time.now)
+      ago = since - self
+      case ago
+      when 0...1.minute
+        'seconds ago'
+      when 1.minute...2.minutes
+        '1 minute ago'
+      when 2.minutes...1.hour
+        "#{(ago.to_f/1.minute.to_f).ceil} minutes ago"
+      when 1.hour...2.hours
+        '1 hour ago'
+      when 2.hours...1.day
+        "#{(ago.to_f/1.hour.to_f).ceil} hours ago"
+      when 1.day...2.days
+        '1 day ago'
+      when 2.days...1.month
+        "#{(ago.to_f/1.day.to_f).ceil} days ago"
+      when 1.month...2.months
+        '1 month ago'
+      when 2.months...1.year
+        "#{(ago.to_f/1.month.to_f).ceil} months ago"
+      when 1.year...2.years
+        '1 year ago'
+      else
+        "#{(ago.to_f/1.year.to_f).ceil} years ago"
+      end
+    end
+  end
+  
+  class ::Time
+    if !method_defined?(:friendly) && ::Numeric.method_defined?(:day)
+      include FriendlyTime
+    else
+      if ::Numeric.method_defined?(:day)
+        warn "#{self}#friendly is already defined. Could not include #{__FILE__}"
+      else
+        warn "#{self}#friendly could not be defined, Numeric days needs to be defined. Could not include #{__FILE__}"
+      end
+    end
+  end
+end

data/lib/koalemos/full.rb

@@ -0,0 +1,31 @@
+module Koalemos
+  module Full
+    # Returns the object if it isn't blank (as in Object#blank?), otherwise it
+    # returns nil. If a block was given as an argument and the object isn't
+    # blank, the block is executed with the object as its first argument. If an
+    # argument +dispatch+ was given and the object wasn't blank the method
+    # given by dispatch is called on the object. This is the same as
+    # foo.full?(&:bar) in the previous block form.
+    def full?(dispatch = nil, *args)
+      if blank?
+        obj = nil
+      #elsif Module === dispatch # TODO
+      # dispatch.found?(self)
+      elsif dispatch
+        obj = __send__(dispatch, *args)
+        obj = nil if obj.blank?
+      else
+        obj = self
+      end
+      if block_given? and obj
+        yield obj
+      else
+        obj
+      end
+    end
+  end
+ 
+  class ::Object
+    include Full
+  end
+end

data/lib/koalemos/hash_union.rb

@@ -0,0 +1,16 @@
+module Koalemos
+  module HashUnion
+    def |(other)
+      other = other.to_hash if other.respond_to?(:to_hash)
+      other.merge(self)
+    end
+  end
+  
+  class ::Hash
+    if method_defined?(:|)
+      warn "#{self}#| already defined, didn't include at #{__FILE__}:#{__LINE__}"
+    else
+      include HashUnion
+    end
+  end
+end

data/lib/koalemos/num_to_time.rb

@@ -0,0 +1,59 @@
+module Koalemos
+  module NumToTime
+    def minute
+      self * 60
+    end
+    alias_method :minutes, :minute
+
+    def hour
+      self * 3600
+    end
+    alias_method :hours, :hour
+
+    def day
+      self * 86400
+    end
+    alias_method :days, :day
+
+    def week
+      self * 604800
+    end
+    alias_method :weeks, :week
+
+    def month
+      self * 2592000
+    end
+    alias_method :months, :month
+
+    def year
+      self * 31536000
+    end
+    alias_method :years, :year
+
+    def ago
+      Time.now - to_i
+    end
+
+    def from_now
+      Time.now + to_i
+    end
+
+    def to_time
+      Time.at(to_i)
+    end
+  end
+  
+  class ::Numeric
+    unless method_defined?(:minute)
+      include NumToTime
+    end
+  end
+  
+  # class ::Float
+  #   unless method_defined?(:minute)
+  #     include NumToTime
+  #   else
+  #     warn "Time methods for #{self} already defined, didn't include at #{__FILE__}:#{__LINE__.to_i-2}"
+  #   end
+  # end
+end

data/lib/koalemos/odd.rb

@@ -0,0 +1,13 @@
+module Koalemos
+  module Odd
+    def odd?
+      self%2 == 1
+    end
+  end
+  
+  class ::Numeric
+    unless method_defined?(:odd?)
+      include Odd
+    end
+  end
+end

data/lib/koalemos/rand.rb

@@ -0,0 +1,427 @@
+#
+# = rand.rb -- library for picking random elements and shuffling
+#
+# Copyright (C) 2004  Ilmari Heikkinen <mailto:kig@misfiring.net>
+#
+# Documentation:: Christian Neukirchen <mailto:chneukirchen@gmail.com>
+# 
+
+module Koalemos
+  module Rand
+    module Enumerable_
+      # Choose and return a random element of the Enumerable.
+      #   [1, 2, 3, 4].pick  #=> 2 (or 1, 3, 4)
+      def pick
+        entries.pick
+      end
+
+      # Return an array of the elements in random order.
+      #   [1, 2, 3, 4].shuffle  #=> [3, 4, 1, 2]
+      def shuffle
+        entries.shuffle
+      end
+
+      # Calls _block_ once for each element in _self_ in random order,
+      # passing that element as a parameter.
+      def each_random(&block)
+        shuffle.each(&block)
+      end
+
+      # Invokes _block_ once for each element of _self_ in random order.
+      # Creates a new array containing the values returned by the block.
+      def map_random(&block)
+        shuffle.map(&block)
+      end
+    end
+
+
+    module Array
+      # Choose and return a random element of _self_.
+      #   [1, 2, 3, 4].pick  #=> 2 (or 1, 3, 4)
+      def pick
+        self[pick_index]
+      end
+
+      # Deletes a random element of _self_, returning that element.
+      #   a = [1, 2, 3, 4]
+      #   a.pick  #=> 2
+      #   a       #=> [1, 3, 4]
+      def pick!
+        i = pick_index
+        rv = self[i]
+        delete_at(i)
+        rv
+      end
+
+      # Return the index of an random element of _self_.
+      #   ["foo", "bar", "baz"].pick_index  #=> 1 (or 0, or 2)
+      def pick_index
+        rand(size)
+      end
+
+      # Destructive pick_index.  Delete a random element of _self_ and
+      # return its index.
+      #   a = [11, 22, 33, 44]
+      #   a.pick_index!  #=> 2
+      #   a              #=> [11, 22, 44]
+      def pick_index!
+        i = pick_index
+        delete_at i
+        i
+      end
+
+      # Return an array of the elements in random order.
+      #   [11, 22, 33, 44].shuffle  #=> [33, 11, 44, 22]
+      def shuffle
+        sort_by{rand}
+      end
+
+      # Destructive shuffle.  Arrange the elements of _self_ in new order.
+      #   a = [11, 22, 33, 44]
+      #   a.shuffle!
+      #   a                      #=> [33, 11, 44, 22]
+      def shuffle!
+        sort!{rand <=> 0.5}
+      end
+    end
+
+
+    module Hash
+      # Choose and return a random key-value pair of _self_.
+      #   {:one => 1, :two => 2, :three => 3}.pick  #=> [:one, 1]
+      def pick
+        k = keys.pick
+        [k, self[k]]
+      end
+
+      # Deletes a random key-value pair of _self_, returning that pair.
+      #   a = {:one => 1, :two => 2, :three => 3}
+      #   a.pick  #=> [:two, 2]
+      #   a       #=> {:one => 1, :three => 3}
+      def pick!
+        rv = pick
+        delete rv.first
+        rv
+      end
+
+      # Return a random key of _self_.
+      #   {:one => 1, :two => 2, :three => 3}.pick_key  #=> :three
+      def pick_key
+        keys.pick
+      end
+
+      # Return a random value of _self_.
+      #   {:one => 1, :two => 2, :three => 3}.pick_value  #=> 3
+      def pick_value
+        values.pick
+      end
+
+      # Delete a random key-value pair of _self_ and return the key.
+      #   a = {:one => 1, :two => 2, :three => 3}
+      #   a.pick_key!  #=> :two
+      #   a       #=> {:one => 1, :three => 3}
+      def pick_key!
+        pick!.first
+      end
+
+      # Delete a random key-value pair of _self_ and return the value.
+      #   a = {:one => 1, :two => 2, :three => 3}
+      #   a.pick_value!  #=> 2
+      #   a       #=> {:one => 1, :three => 3}
+      def pick_value!
+        pick!.last
+      end
+
+      # Return the key-value pairs of _self_ with _keys_ and _values_
+      # shuffled independedly.
+      #   {:one => 1, :two => 2, :three => 3}.shuffle_hash_pairs
+      #      #=> [[:one, 3], [:two, 1], [:three, 2]]
+      def shuffle_hash_pairs
+        keys.shuffle.zip(values.shuffle)
+      end
+
+      # Return a copy of _self_ with _values_ arranged in random order.
+      #   {:one => 1, :two => 2, :three => 3}.shuffle_hash
+      #      #=> {:two=>2, :three=>1, :one=>3}
+      def shuffle_hash
+        shuffled = {}
+        shuffle_hash_pairs.each{|k, v|
+          shuffled[k] = v
+        }
+        shuffled
+      end
+
+      # Destructive shuffle_hash.  Arrange the values of _self_ in
+      # new, random order.
+      #   h = {:one => 1, :two => 2, :three => 3}
+      #   h.shuffle_hash!
+      #   h  #=> {:two=>2, :three=>1, :one=>3}
+      def shuffle_hash!
+        shuffle_hash_pairs.each{|k, v|
+          self[k] = v
+        }
+        self
+      end
+    end
+
+
+    module String
+      # Return the string with characters arranged in random order.
+      #   "Ruby rules".shuffle_chars  #=> "e lybRsuur"
+      def shuffle_chars
+        split(//).shuffle.join('')
+      end
+
+      # Destructive shuffle_chars.  Arrange the characters of the string
+      # in new, random order.
+      #   s = "Ruby rules".shuffle_chars
+      #   s.shuffle_chars!
+      #   s    #=> "e lybRsuur"
+      def shuffle_chars!
+        self[0,size] = shuffle_chars
+      end
+
+      # Return a random byte of _self_.
+      #   "Ruby rules".pick_byte  #=> 121
+      def pick_byte
+        self[pick_index]
+      end
+
+      # Return a single-character string of a random character in _self_.
+      #   "Ruby rules".pick_char  #=> "y"
+      def pick_char
+        pick_byte.chr
+      end
+
+      # Destructive pick_char.  Delete a random character of the string
+      # and return it as a single-character string.
+      #   s = "Ruby rules"
+      #   s.pick_char!  #=> "y"
+      #   s             #=> "Rub rules"
+      def pick_char!
+        i = pick_index
+        rv = self[i,1]
+        self[i,1] = ""
+        rv
+      end
+
+      # Destructive pick_byte.  Delete a random byte of _self_ and return it.
+      #   s = "Ruby rules"
+      #   s.pick_byte!  #=> 121
+      #   s             #=> "Rub rules"
+      def pick_byte!
+        pick_char![0]
+      end
+
+      # Return a random byte index of _self_.
+      #   "Ruby rules".pick_index  #=> 3
+      def pick_index
+        rand(size)
+      end
+
+      # Destructive pick_index.  Delete a random byte of _self_ and
+      # return it's index.
+      #   s = "Ruby rules"
+      #   s.pick_index  #=> 3
+      #   s             #=> "Rub rules"
+      def pick_index!
+        i = pick_index
+        self[i,1] = ""
+        i
+      end
+    end
+    
+    unless Array.respond_to?(:pick)
+      for k in Rand.constants
+        Object.const_get( k.gsub(/_/,'') ).class_eval do
+          include Rand.const_get(k)
+        end
+      end
+    else
+      warn "random mixins already defined cannot be added from #{__FILE__}"
+    end
+    
+  end
+end
+
+
+if __FILE__ == $0
+
+require 'test/unit'
+include Koalemos
+
+module RandTestHelpers          # :nodoc:
+  def picker(enum, enum_check, method, n=50)
+    (1..n).all?{ enum_check.include? enum.send(method) }
+  end
+
+  def try_shuffling(enum, enum_c, method)
+    rv = nil
+    10.times{
+     rv = enum.send method
+     break if rv != enum_c
+    }
+    rv
+  end
+end
+
+
+class RandArrayTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def ar
+    (0..99).to_a
+  end
+
+  def test_pick
+    a = ar
+    results = (0...a.size).map{ a.pick }
+    assert true, results.all? {|r| a.include? r }
+  end
+
+  def test_pick!
+    a = ar
+    results = (0...a.size).map{ a.pick! }
+    assert true, results.sort == (0..99).to_a and a.empty?
+  end
+
+  def test_pick_index
+    a = ar
+    results = (0...a.size).map{ a.pick_index }
+    assert true, results.all? {|r| r.between?(0, a.size-1) }
+  end
+
+  def test_pick_index!
+    a = ar
+    # side-effect-relying block; a.size = a.size-1 after pick_index!,
+    # so the picked index max value is the new a.size
+    assert true, (0...a.size).all?{ a.pick_index!.between?(0, a.size) } and a.empty?
+  end
+
+  def test_shuffle
+    a = ar
+    shuffled = try_shuffling(a, a, :shuffle)
+    assert true, shuffled.sort == a and shuffled != a
+  end
+
+  def test_shuffle!
+    a = ar
+    try_shuffling(a, ar, :shuffle!)
+    assert true, a != ar and a.sort == ar
+  end
+end
+
+
+class RandHashTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def ha
+    Hash[*(1..100).to_a]
+  end
+
+  def test_pick
+    assert true, picker(ha, ha.entries, :pick)
+  end
+
+  def test_pick!
+    h = ha
+    assert true, picker(h, ha.entries, :pick!) and h.empty? 
+  end
+
+  def test_pick_key
+    assert true, picker(ha, ha.keys, :pick_key)
+  end
+
+  def test_pick_key!
+    h = ha
+    assert true, picker(h, ha.keys, :pick_key!) and h.empty?
+  end
+
+  def test_pick_value
+    assert true, picker(ha, ha.values, :pick_value)
+  end
+
+  def test_pick_value!
+    h = ha
+    assert true, picker(h, ha.values, :pick_value!) and h.empty?
+  end
+
+  def test_shuffle_hash
+    h = ha
+    hs = try_shuffling(ha, h, :shuffle_hash)
+    assert true, hs != h and (hs.keys + hs.values).sort == (h.keys + h.values).sort
+  end
+
+  def test_shuffle_hash!
+    h = ha
+    hs = ha
+    try_shuffling(hs, h, :shuffle_hash!)
+    assert true, hs != h and (hs.keys + hs.values).sort == (h.keys + h.values).sort
+  end
+
+  def test_shuffle
+    h = ha
+    hs = try_shuffling(ha, h, :shuffle)
+    assert true, hs != h and hs.entries.sort == h.entries.sort
+  end
+end
+
+
+class RandStringTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def self.pick_tests(endings)
+    endings.each{|ending, compare_str_f|
+      define_method("test_pick#{ending}"){
+        s = str
+        assert true, picker(s, instance_eval(&compare_str_f), "pick#{ending}", s.size)
+      }
+    }
+  end
+
+  def self.pick_tests!(endings)
+    endings.each{|ending, compare_str_f|
+      define_method("test_pick#{ending}!"){
+        s = str
+        assert true, picker(s, instance_eval(&compare_str_f), "pick#{ending}!", s.size) and s.empty?
+      }
+    }
+  end
+
+  def str
+    (("a".."z").to_s + "\n") * 10
+  end
+
+  def test_shuffle
+    s = str
+    ss = try_shuffling(s, s.to_a, :shuffle)
+    assert true, ss != s.to_a and ss.sort == s.to_a.sort
+  end
+
+  def test_shuffle_chars
+    s = str
+    ss = try_shuffling(s, s.split(//), :shuffle_chars)
+    assert true, ss != s and ss.split(//).sort == s.split(//).sort
+  end
+
+  def test_shuffle_chars!
+    s = str
+    ss = str
+    try_shuffling(ss, s.split(//), :shuffle_chars!)
+    assert true, ss != s and ss.split(//).sort == s.split(//).sort
+  end
+
+  pick_tests({ ""      => lambda{str.to_a}, 
+               :_char  => lambda{str.split(//)}, 
+               :_byte  => lambda{str.split(//).map{|c| c[0]}}, 
+               :_index => lambda{(0...str.size).to_a}
+             })
+
+  pick_tests!({ :_char  => lambda{str.split(//)}, 
+                :_byte  => lambda{str.split(//).map{|c| c[0]}}, 
+                :_index => lambda{(0...str.size).to_a}
+              })
+end
+
+
+end #if

data/lib/koalemos/round.rb

@@ -0,0 +1,38 @@
+module Koalemos
+  # A bit more versatile rounding for Ruby
+  module Round
+    def self.included(klass)
+      if klass.instance_method(:round)
+        klass.class_eval do
+          begin
+            remove_method :round
+          rescue NameError
+          end
+        end
+        super
+      else
+        raise NoMethodError, 'no round method found'
+      end
+    end
+
+    def round(places = 0)
+      unless Integer === places
+        raise TypeError, "argument places has to be an Integer"
+      end
+      if places < 0
+        max_places = -Math.log(self.abs + 1) / Math.log(10)
+        raise ArgumentError, "places has to be >= #{max_places.ceil}" if max_places > places 
+      end
+      t = self
+      f = 10.0 ** places
+      t *= f
+      if t >= 0.0
+        t = (t + 0.5).floor
+      elsif t < 0.0
+        t = (t - 0.5).ceil
+      end
+      t /= f
+      t.nan? ? self : t
+    end
+  end
+end

data/lib/koalemos/symbol_to_proc.rb

@@ -0,0 +1,15 @@
+module Koalemos
+  module ToProc
+    def to_proc
+      lambda do |obj, *args|
+        obj.__send__(self, *args[0..-1])
+      end
+    end
+  end
+  
+  class ::Symbol
+    unless method_defined?(:to_proc)
+      include ToProc
+    end
+  end
+end

data/lib/koalemos/try.rb

@@ -0,0 +1,13 @@
+module Koalemos
+  unless Object.method_defined?(:try)
+    class Object
+      alias_method :try, :__send__
+    end
+    
+    class ::NilClass
+      def try(*a)
+        nil
+      end
+    end
+  end#unless
+end

data/lib/koalemos/uniq_by.rb

@@ -0,0 +1,29 @@
+module Koalemos
+  module UniqBy
+    def uniq_by(&b)
+      b ||= lambda { |x| x }
+      inject({}) { |h, e| h[b[e]] ||= e; h }.values
+    end
+  end
+  
+  module ::Enumerable
+    if method_defined?(:uniq_by)
+      warn "#{self}#uniq_by already defined, didn't include at #{__FILE__}:#{__LINE__}"
+    else
+      include UniqBy
+    end
+  end
+  
+  class ::Array
+    if method_defined?(:uniq_by)
+      warn "#{self}#uniq_by already defined, didn't include at #{__FILE__}:#{__LINE__}"
+    else
+      include UniqBy
+      
+      def uniq_by!(&b)
+        replace uniq_by(&b)
+      end
+    end
+  end
+    
+end

data/spec/koalemos_spec.rb

@@ -0,0 +1,7 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Koalemos" do
+  it "fails" do
+    fail "hey buddy, you should probably rename this file and start specing for real"
+  end
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--color

data/spec/spec_helper.rb

@@ -0,0 +1,9 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'koalemos'
+require 'spec'
+require 'spec/autorun'
+
+Spec::Runner.configure do |config|
+  
+end

metadata

@@ -0,0 +1,99 @@
+--- !ruby/object:Gem::Specification 
+name: koalemos
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Tal Atlas
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-12-26 00:00:00 -05:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.2.9
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: yard
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: Nothing here you'd be interested in
+email: me@talatlas.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- koalemos.gemspec
+- lib/koalemos.rb
+- lib/koalemos/beginning_of_day.rb
+- lib/koalemos/blank.rb
+- lib/koalemos/commaify.rb
+- lib/koalemos/friendly_time.rb
+- lib/koalemos/full.rb
+- lib/koalemos/hash_union.rb
+- lib/koalemos/num_to_time.rb
+- lib/koalemos/odd.rb
+- lib/koalemos/rand.rb
+- lib/koalemos/round.rb
+- lib/koalemos/symbol_to_proc.rb
+- lib/koalemos/try.rb
+- lib/koalemos/uniq_by.rb
+- spec/koalemos_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/Talby/koalemos
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Some extensions for me in all my projects
+test_files: 
+- spec/koalemos_spec.rb
+- spec/spec_helper.rb