facets 2.8.1 → 2.8.2

data/lib/core/facets/string/exclude.rb

@@ -0,0 +1,10 @@
+class String
+
+  # The inverse of include?.
+  #
+  def exclude?(str)
+    !include?(str)
+  end
+
+end
+

data/lib/core/facets/string/expand_tab.rb

@@ -8,12 +8,12 @@ class String
   #
   # Thanks to GGaramuno for a more efficient algorithm. Very nice.
   #
-  # TODO: Don't much care for the name String#expand_tab.
-  # What about a more concise name like #detab?
-  #
   # CREDIT: Gavin Sinclair, Noah Gibbs, GGaramuno
+  #
+  # TODO: Don't much care for the name String#expand_tabs.
+  # What about a more concise name like #detab?
 
-  def expand_tab(n=8)
+  def expand_tabs(n=8)
     n = n.to_int
     raise ArgumentError, "n must be >= 0" if n < 0
     return gsub(/\t/, "") if n == 0
@@ -28,8 +28,8 @@ class String
     str
   end
 
-  # Pluralized form of #expand_tab.
-  alias_method :expand_tabs, :expand_tab
+  # Singular form of #expand_tabs.
+  alias_method :expand_tab, :expand_tabs
 
 end
 

data/lib/core/facets/time/future.rb

@@ -0,0 +1,14 @@
+class Time
+
+  #
+  def past?
+    self < ::Time.current
+  end
+
+  #
+  def future?
+    self < ::Time.current
+  end
+
+end
+

data/lib/core/facets/time/past.rb

@@ -0,0 +1 @@
+require 'facets/time/future'

data/lib/core/facets/unboundmethod/name.rb

@@ -1,24 +1,28 @@
 class UnboundMethod
 
-  # Return the name of the method.
-  #
-  # Be aware that in ruby 1.9 UnboundMethod#name is defined already,
-  # but it returns a Symbol not a String.
-  #
-  #   class X
-  #     def foo; end
-  #   end
-  #
-  #   meth = X.instance_method(:foo)
-  #
-  #   meth.name  #=> "foo"
-  #
-  # CREDIT: Trans
+  unless method_defined?(:name) # 1.8.7+
 
-  def name
-    i = to_s.rindex('#')
-    to_s.slice(i+1...-1)
-  end unless method_defined?(:name) # 1.8.7+
+    # Return the name of the method.
+    #
+    # Be aware that in ruby 1.9 UnboundMethod#name is defined already,
+    # but it returns a Symbol not a String.
+    #
+    #   class X
+    #     def foo; end
+    #   end
+    #
+    #   meth = X.instance_method(:foo)
+    #
+    #   meth.name  #=> :foo
+    #
+    # CREDIT: Trans
+
+    def name
+      i = to_s.rindex('#')
+      to_s.slice(i+1...-1).to_sym
+    end
+
+  end
 
 end
 

data/lib/more/facets/date.rb

@@ -76,6 +76,7 @@ class Date
     #::Time.send("#{form}_time", year, month, day)
   end
 
+  #
   def xmlschema
     to_time.xmlschema
   end
@@ -198,17 +199,25 @@ class DateTime
     ::Time.local(2007).utc_offset.to_r / 86400
   end
 
+  def future?
+    self > ::DateTime.current
+  end
+
+  def past?
+    self < ::DateTime.current
+  end
+
   # Converts self to a Ruby Date object; time portion is discarded
   def to_date
     ::Date.new(year, month, day)
   end
 
   # Attempts to convert self to a Ruby Time object; returns self if
-  # out of range of Ruby Time class, If self has an offset other than 0,
+  # out of range of Ruby Time class. If self has an offset other than 0,
   # self will just be returned unaltered, since there's no clean way
-  # to map it to a Time
+  # to map it to a Time.
   def to_time
-    self.offset == 0 ? ::Time.utc(year, month, day, hour, min, sec) : self
+    self.offset == 0 ? ::Time.utc_time(year, month, day, hour, min, sec) : self
   end
 
   # To be able to keep Times, Dates and DateTimes interchangeable on conversions
@@ -309,6 +318,7 @@ class DateTime
   #
   #   DateTime.civil(2005, 2, 21, 10, 11, 12, Rational(-6, 24))       # => Mon, 21 Feb 2005 10:11:12 -0600
   #   DateTime.civil(2005, 2, 21, 10, 11, 12, Rational(-6, 24)).utc   # => Mon, 21 Feb 2005 16:11:12 +0000
+  #
   def utc
     new_offset(0)
   end
@@ -340,6 +350,24 @@ end
 
 class Time
 
+  #
+  def self.local_time(*args)
+    time_with_datetime_fallback(:local, *args)
+  end
+
+  #
+  def self.utc_time(*args)
+    time_with_datetime_fallback(:utc, *args)
+  end
+
+  #
+  def self.time_with_datetime_fallback(utc_or_local, year, month=1, day=1, hour=0, min=0, sec=0, usec=0)
+    ::Time.send(utc_or_local, year, month, day, hour, min, sec, usec)
+  rescue
+    offset = utc_or_local.to_sym == :local ? ::DateTime.local_offset : 0
+    ::DateTime.civil(year, month, day, hour, min, sec, offset)
+  end
+
   public :to_date
   public :to_datetime
 
@@ -350,6 +378,7 @@ class Time
   #
   #   your_time = Time.parse("1/13/2009 1:13:03 P.M.")  # => Tue Jan 13 13:13:03 -0500 2009
   #   your_time.to_date                                 # => Tue, 13 Jan 2009
+  #
   def to_date
     ::Date.new(year, month, day)
   end
@@ -371,6 +400,7 @@ class Time
   #
   #   your_time = Time.parse("1/13/2009 1:13:03 P.M.")  # => Tue Jan 13 13:13:03 -0500 2009
   #   your_time.to_datetime                             # => Tue, 13 Jan 2009 13:13:03 -0500
+  #
   def to_datetime
     ::DateTime.civil(year, month, day, hour, min, sec, Rational(utc_offset, 86400))
   end
@@ -380,6 +410,11 @@ end
 
 class String
 
+  #
+  def to_time(form = :utc)
+    ::Time.__send__("#{form}_time", *::Date._parse(self, false).values_at(:year, :mon, :mday, :hour, :min, :sec).map{|arg| arg || 0 })
+  end
+
   # Convert string to DateTime.
   def to_datetime
     date = ::Date._parse(self, false).values_at(:year, :mon, :mday, :hour, :min, :sec).map { |arg| arg || 0 }

data/lib/more/facets/fileutils/cp_rx.rb

@@ -0,0 +1,42 @@
+module FileUtils
+
+  # Both of these are modified from the implementations in fileutils.rb from Ruby 1.9.1p378.
+
+  # Like FileUtils.cp_r, but takes a filter proc that can return false to skip a file.
+  #
+  #   cp_rx "bigDirectoryTree", "dest", {:noop => true} do |name|
+	#     /dontCopyThis$/.match(name)
+  #   end
+  #
+  # Note that if the filter rejects a subdirectory then everything within that
+  # subdirectory is automatically skipped as well.
+
+  def cp_rx(src, dest, options = {}, &filter)
+	  fu_check_options(options, OPT_TABLE['cp_r'])
+    if options[:verbose]
+	    fu_output_message("cp -r#{options[:preserve] ? 'p' : ''}#{options[:remove_destination] ? ' --remove-destination' : ''} #{[src,dest].flatten.join ' '}")
+    end
+	  return if options[:noop]
+	  fu_each_src_dest(src, dest) do |s, d|
+		  copy_entryx(s, d, filter, options[:preserve], options[:dereference_root], options[:remove_destination])
+	  end
+  end
+
+  # Like FileUtils.copy_entry, but takes a filter proc that can return false to skip a file.
+  #
+  # Note that if the filter rejects a subdirectory then everything within that
+  # subdirectory is automatically skipped as well.
+
+  def copy_entryx(src, dest, filter, preserve = false, dereference_root = false, remove_destination = false)
+	  Entry_.new(src, nil, dereference_root).traverse do |ent|
+		  if filter.call(ent.path) then
+			  destent = Entry_.new(dest, ent.rel, false)
+			  File.unlink destent.path if remove_destination && File.file?(destent.path)
+			  ent.copy destent.path
+			  ent.copy_metadata(destent.path) if preserve
+		  end
+	  end
+  end
+
+end
+

data/lib/more/facets/pathname.rb

@@ -135,7 +135,7 @@ class Pathname
 
   #
   def empty?
-    Dir.glob(::File.join(self.to_s, '*')).empty?
+    Dir.glob(::File.join(to_s, '*')).empty?
   end
 
   #

data/meta/homepage

@@ -1 +1 @@
-http://facets.rubyforge.org
+http://rubyworks.github.com/facets

data/meta/released

@@ -1 +1 @@
-2009-07-03
+2010-02-22

data/meta/version

@@ -1 +1 @@
-2.8.1
+2.8.2

data/test/core/array/test_product.rb

@@ -19,11 +19,6 @@ class TC_Array_Product < Test::Unit::TestCase
     assert_equal( r, z )
   end
 
-  def test_op_product
-    a = [1,2,3] ** [4,5,6]
-    assert_equal( [[1, 4],[1, 5],[1, 6],[2, 4],[2, 5],[2, 6],[3, 4],[3, 5],[3, 6]], a )
-  end
-
   #def test_product_01
   #  i = [[1,2], [4], ["apple", "banana"]]
   #  o = [[1, 4, "apple"], [1, 4, "banana"], [2, 4, "apple"], [2, 4, "banana"]]

data/test/core/enumerable/test_find_yield.rb

@@ -0,0 +1,75 @@
+require 'facets/enumerable/find_yield'
+require 'test/unit'
+
+class TestEnumerable < Test::Unit::TestCase
+  
+  def test_find_yields_a_value
+    assert_equal true, [true].find_yield { |value| value }
+  end
+
+  def test_find_yield_detects_correct_value
+    assert_equal 1, [1].find_yield { |value| value }
+  end
+
+  def test_find_yield_returns_value_of_block
+    assert_equal 4, [1].find_yield { |v| v + 3 }
+  end
+
+  def test_find_yield_detects_first_truthy_value
+    assert_equal 1, [false, false, 1].find_yield { |value| value }
+  end
+
+  def test_find_yield_returns_value_when_block_is_true
+    assert_equal true, [false].find_yield { |value| true }
+  end
+
+  def test_find_yield_returns_early_when_block_is_true
+    val1 = lambda { :something }
+    val2 = lambda { raise "This shouldn't be called" }
+
+    assert_equal :something, [val1, val2].find_yield { |obj| obj.call }
+  end
+
+  def test_find_yield_returns_nil_when_block_returns_false_for_all_elements
+    assert_equal nil, [1,2,3,4].find_yield { |value| false }
+  end
+
+  def test_find_yield_returns_nil_when_no_elements_in_collection
+    assert_equal nil, [].find_yield { |v| }
+  end
+
+  def test_find_yield_can_have_return_value_specified_when_block_isnt_true
+    assert_equal :a_value, [1,2,3].find_yield(:a_value) { |value| false }
+  end
+
+  def test_find_yield_documentation_correct
+    obj1, obj2 = Object.new, Object.new
+
+    class << obj1
+      def foo?
+        false
+      end
+
+      def foo
+        raise
+      end
+    end
+
+    class << obj2
+      def foo?
+        true
+      end
+
+      def foo
+        "a value"
+      end
+    end
+
+    assert_equal false, obj1.foo?
+    assert_equal true, obj2.foo?
+    assert_equal "a value", obj2.foo
+
+    result = [obj1, obj2].find_yield { |obj| obj.foo if obj.foo? }
+    assert_equal result, "a value"
+  end
+end

data/test/core/numeric/test_spacing.rb

@@ -0,0 +1,12 @@
+require 'facets/numeric/spacing'
+require 'test/unit'
+ 
+class TC_Numeric_spacing < Test::Unit::TestCase
+  def test_spacing
+    samples = [-10.5, -3, 3, 1.0e14, 10000, 14.5e10]
+    samples.each do |numeric_item|
+      assert numeric_item.to_s.size == numeric_item.spacing
+      assert numeric_item.spacing.kind_of?(Integer)
+    end
+  end
+end

data/test/core/unboundmethod/test_name.rb

@@ -3,13 +3,13 @@ require 'facets/unboundmethod/name'
 class Test_UnboundMethod_Name < Test::Unit::TestCase
 
   class X
-    def foo; end
+    def foo; "bar"; end
   end
 
   def test_name
     meth = X.instance_method(:foo)
-    assert_equal("foo", meth.name)
-  end  #if RUBY_VERSION < "1.9" # UnboundMethod#name is defined already in 1.9.
+    assert_equal(:foo, meth.name.to_sym)
+  end
 
 end
 

metadata

@@ -1,7 +1,12 @@
 --- !ruby/object:Gem::Specification 
 name: facets
 version: !ruby/object:Gem::Version 
-  version: 2.8.1
+  prerelease: false
+  segments: 
+  - 2
+  - 8
+  - 2
+  version: 2.8.2
 platform: ruby
 authors: 
 - Thomas Sawyer <transfire@gmail.com>
@@ -9,7 +14,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-12-25 00:00:00 -05:00
+date: 2010-02-26 00:00:00 -05:00
 default_executable: 
 dependencies: []
 
@@ -27,19 +32,13 @@ description: |-
   The modules include a variety of useful classes, mixins
   and microframeworks, from the Functor to a complete
   Annotations system.
-email: facets-universal@rubyforge.org
+email: 
 executables: []
 
 extensions: []
 
-extra_rdoc_files: 
-- Rakefile
-- HISTORY.rdoc
-- MANIFEST
-- NOTES
-- README.rdoc
-- AUTHORS
-- COPYING
+extra_rdoc_files: []
+
 files: 
 - demo/hook.rdoc
 - demo/scenario_require.rdoc
@@ -62,6 +61,7 @@ files:
 - lib/core/facets/array/splice.rb
 - lib/core/facets/array/stackable.rb
 - lib/core/facets/array/traverse.rb
+- lib/core/facets/array/uniq_by.rb
 - lib/core/facets/array.rb
 - lib/core/facets/binding/caller.rb
 - lib/core/facets/binding/callstack.rb
@@ -105,7 +105,7 @@ files:
 - lib/core/facets/duplicable.rb
 - lib/core/facets/enumerable/accumulate.rb
 - lib/core/facets/enumerable/cluster_by.rb
-- lib/core/facets/enumerable/collect.rb
+- lib/core/facets/enumerable/collapse.rb
 - lib/core/facets/enumerable/collect_with_index.rb
 - lib/core/facets/enumerable/commonality.rb
 - lib/core/facets/enumerable/compact_map.rb
@@ -114,14 +114,16 @@ files:
 - lib/core/facets/enumerable/divide.rb
 - lib/core/facets/enumerable/duplicates.rb
 - lib/core/facets/enumerable/each_by.rb
+- lib/core/facets/enumerable/each_with_object.rb
 - lib/core/facets/enumerable/entropy.rb
 - lib/core/facets/enumerable/every.rb
 - lib/core/facets/enumerable/ewise.rb
+- lib/core/facets/enumerable/exclude.rb
 - lib/core/facets/enumerable/filter.rb
+- lib/core/facets/enumerable/find_yield.rb
 - lib/core/facets/enumerable/frequency.rb
 - lib/core/facets/enumerable/graph.rb
 - lib/core/facets/enumerable/group_by.rb
-- lib/core/facets/enumerable/inject.rb
 - lib/core/facets/enumerable/map_detect.rb
 - lib/core/facets/enumerable/map_send.rb
 - lib/core/facets/enumerable/map_with_index.rb
@@ -133,11 +135,14 @@ files:
 - lib/core/facets/enumerable/one.rb
 - lib/core/facets/enumerable/per.rb
 - lib/core/facets/enumerable/probability.rb
+- lib/core/facets/enumerable/purge.rb
 - lib/core/facets/enumerable/split.rb
 - lib/core/facets/enumerable/sum.rb
 - lib/core/facets/enumerable/take.rb
 - lib/core/facets/enumerable/uniq_by.rb
 - lib/core/facets/enumerable.rb
+- lib/core/facets/enumerator/fx.rb
+- lib/core/facets/enumerator.rb
 - lib/core/facets/exception/detail.rb
 - lib/core/facets/exception/raised.rb
 - lib/core/facets/exception/suppress.rb
@@ -234,6 +239,7 @@ files:
 - lib/core/facets/kernel/ergo.rb
 - lib/core/facets/kernel/extend.rb
 - lib/core/facets/kernel/extension.rb
+- lib/core/facets/kernel/false.rb
 - lib/core/facets/kernel/here.rb
 - lib/core/facets/kernel/identical.rb
 - lib/core/facets/kernel/in.rb
@@ -266,6 +272,7 @@ files:
 - lib/core/facets/kernel/singleton_class.rb
 - lib/core/facets/kernel/source_location.rb
 - lib/core/facets/kernel/tap.rb
+- lib/core/facets/kernel/true.rb
 - lib/core/facets/kernel/try.rb
 - lib/core/facets/kernel/val.rb
 - lib/core/facets/kernel/with.rb
@@ -315,12 +322,13 @@ files:
 - lib/core/facets/numeric/distance.rb
 - lib/core/facets/numeric/length.rb
 - lib/core/facets/numeric/round.rb
-- lib/core/facets/numeric/size.rb
+- lib/core/facets/numeric/spacing.rb
 - lib/core/facets/numeric.rb
 - lib/core/facets/objectspace/classes.rb
 - lib/core/facets/objectspace/op_fetch.rb
 - lib/core/facets/objectspace.rb
 - lib/core/facets/proc/bind.rb
+- lib/core/facets/proc/bind_to.rb
 - lib/core/facets/proc/compose.rb
 - lib/core/facets/proc/curry.rb
 - lib/core/facets/proc/to_method.rb
@@ -352,6 +360,7 @@ files:
 - lib/core/facets/string/each_word.rb
 - lib/core/facets/string/edit_distance.rb
 - lib/core/facets/string/end_with.rb
+- lib/core/facets/string/exclude.rb
 - lib/core/facets/string/expand_tab.rb
 - lib/core/facets/string/file.rb
 - lib/core/facets/string/fold.rb
@@ -412,7 +421,9 @@ files:
 - lib/core/facets/time/ago.rb
 - lib/core/facets/time/change.rb
 - lib/core/facets/time/elapse.rb
+- lib/core/facets/time/future.rb
 - lib/core/facets/time/hence.rb
+- lib/core/facets/time/past.rb
 - lib/core/facets/time/round.rb
 - lib/core/facets/time/set.rb
 - lib/core/facets/time/stamp.rb
@@ -441,11 +452,11 @@ files:
 - lib/more/facets/dictionary.rb
 - lib/more/facets/duration.rb
 - lib/more/facets/enumargs.rb
-- lib/more/facets/enumerator.rb
 - lib/more/facets/equitable.rb
 - lib/more/facets/erb.rb
 - lib/more/facets/expirable.rb
 - lib/more/facets/filelist.rb
+- lib/more/facets/fileutils/cp_rx.rb
 - lib/more/facets/fileutils/head.rb
 - lib/more/facets/fileutils/safe_ln.rb
 - lib/more/facets/fileutils/slice.rb
@@ -506,7 +517,6 @@ files:
 - lib/more/facets/succ.rb
 - lib/more/facets/thread.rb
 - lib/more/facets/timer.rb
-- lib/more/facets/tracepoint.rb
 - lib/more/facets/tuple.rb
 - lib/more/facets/uri.rb
 - lib/more/facets/version.rb
@@ -572,10 +582,10 @@ files:
 - test/core/enumerable/test_entropy.rb
 - test/core/enumerable/test_every.rb
 - test/core/enumerable/test_ewise.rb
+- test/core/enumerable/test_find_yield.rb
 - test/core/enumerable/test_frequency.rb
 - test/core/enumerable/test_group_by.rb
 - test/core/enumerable/test_inject.rb
-- test/core/enumerable/test_map_detect.rb
 - test/core/enumerable/test_map_with_index.rb
 - test/core/enumerable/test_mash.rb
 - test/core/enumerable/test_modulate.rb
@@ -683,6 +693,7 @@ files:
 - test/core/numeric/test_approx.rb
 - test/core/numeric/test_distance.rb
 - test/core/numeric/test_round.rb
+- test/core/numeric/test_spacing.rb
 - test/core/proc/test_bind.rb
 - test/core/proc/test_compose.rb
 - test/core/proc/test_curry.rb
@@ -796,9 +807,8 @@ files:
 - README.rdoc
 - AUTHORS
 - COPYING
-- MANIFEST
 has_rdoc: true
-homepage: http://facets.rubyforge.org
+homepage: http://rubyworks.github.com/facets
 licenses: []
 
 post_install_message: 
@@ -812,18 +822,20 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      segments: 
+      - 0
       version: "0"
-  version: 
 required_rubygems_version: !ruby/object:Gem::Requirement 
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      segments: 
+      - 0
       version: "0"
-  version: 
 requirements: []
 
 rubyforge_project: facets
-rubygems_version: 1.3.5
+rubygems_version: 1.3.6.pre.3
 signing_key: 
 specification_version: 3
 summary: Premium Core Extensions and Standard Additions
@@ -872,10 +884,10 @@ test_files:
 - test/core/enumerable/test_entropy.rb
 - test/core/enumerable/test_every.rb
 - test/core/enumerable/test_ewise.rb
+- test/core/enumerable/test_find_yield.rb
 - test/core/enumerable/test_frequency.rb
 - test/core/enumerable/test_group_by.rb
 - test/core/enumerable/test_inject.rb
-- test/core/enumerable/test_map_detect.rb
 - test/core/enumerable/test_map_with_index.rb
 - test/core/enumerable/test_mash.rb
 - test/core/enumerable/test_modulate.rb
@@ -983,6 +995,7 @@ test_files:
 - test/core/numeric/test_approx.rb
 - test/core/numeric/test_distance.rb
 - test/core/numeric/test_round.rb
+- test/core/numeric/test_spacing.rb
 - test/core/proc/test_bind.rb
 - test/core/proc/test_compose.rb
 - test/core/proc/test_curry.rb