sugar-high 0.6.3 → 0.7.0

data/lib/sugar-high/path.rb

@@ -1,7 +1,7 @@
-class String  
+class String
   def path
     self.extend PathString
-  end      
+  end
 end
 
 module PathString
@@ -15,38 +15,38 @@ module PathString
   def to_dir option=nil
     raise ArgumentError, "Dir doesn't exist" if option == :raise && !File.directory?(self)
     Dir.new(self) if File.directory? self
-  end  
+  end
   alias_method :new_dir, :to_dir
   alias_method :dir, :to_dir
 
-  def to_symlink new_path #, option=nil  
+  def to_symlink new_path #, option=nil
     # raise ArgumentError, "New link location doesn't exist" if option == :raise && !File.exist?(new_path)
     File.symlink(self, new_path)
   end
   alias_method :new_symlink, :to_symlink
   alias_method :symlink, :to_symlink
-  
-  def exists?  
+
+  def exists?
     File.exist? self
   end
   alias_method :there?, :exists?
 
-  def file?  
+  def file?
     File.file? self
   end
   alias_method :is_file?, :file?
 
-  def dir?  
+  def dir?
     File.directory? self
   end
   alias_method :is_dir?, :dir?
   alias_method :directory?, :dir
 
-  def symlink?  
+  def symlink?
     File.symlink? self
   end
   alias_method :is_symlink?, :symlink?
-  
+
   def up lv
     ('../' * lv) + self
   end

data/lib/sugar-high/properties.rb

@@ -1,39 +1,39 @@
 # From: http://www.infoq.com/articles/properties-metaprogramming
 
-module Properties  
-  def self.extended(base) 
+module Properties
+  def self.extended(base)
     base.class_eval %{
-      def fire_event_for(sym, arg) 
+      def fire_event_for(sym, arg)
         return if !@listener[sym]
-        @listener[sym].each {|l| l.call(arg) } 
-      end 
+        @listener[sym].each {|l| l.call(arg) }
+      end
     }
   end
-  
+
   # def property(sym, &predicate)
   def property(sym, predicate=nil)
     define_method(sym) do
       instance_variable_get("@#{sym}")
     end
-  
+
     define_method("#{sym}=") do |arg|
       return if !predicate.call(arg) if predicate
       instance_variable_set("@#{sym}", arg)
       fire_event_for(sym, arg)
     end
-  
-    define_method("add_#{sym}_listener") do |x| 
+
+    define_method("add_#{sym}_listener") do |x|
       @listener ||= {}
       @listener[sym] ||= []
       @listener[sym] << x
     end
-    
-    define_method("remove_#{sym}_listener") do |x| 
+
+    define_method("remove_#{sym}_listener") do |x|
       return if !@listener[sym]
       @listener[sym].delete_at(x)
     end
   end
-  
+
   def is(test)
     lambda {|val| test === val }
   end

data/lib/sugar-high/regexp.rb

@@ -1,4 +1,4 @@
-class String 
+class String
   def to_regexp
     /#{Regexp.escape(self)}/
   end
@@ -7,7 +7,7 @@ end
 class Regexp
   def to_regexp
     self
-  end  
+  end
 end
 
 class MatchData
@@ -16,7 +16,7 @@ class MatchData
   end
 
   def offset_before
-    offset(0)[0] -1    
+    offset(0)[0] -1
   end
 end
 

data/lib/sugar-high/rspec/matchers/have_aliases.rb

@@ -4,7 +4,7 @@ module RSpec
 end
 
 module RSpec::Sugar
-  module Matchers  
+  module Matchers
     class HaveAliases
 
       attr_reader :method, :alias_methods, :cause
@@ -15,16 +15,16 @@ module RSpec::Sugar
         @cause = []
       end
 
-      def matches? obj, options={}        
+      def matches? obj, options={}
         if !obj.respond_to? method
           cause << "Method ##{method} to alias does NOT exist"
           return nil
         end
-        
-        alias_methods.each do |method|          
-          cause << "Alias method ##{method} does NOT exist" if !is_alias? obj, alias_meth            
-        end 
-        cause.empty?        
+
+        alias_methods.each do |method|
+          cause << "Alias method ##{method} does NOT exist" if !is_alias? obj, alias_meth
+        end
+        cause.empty?
       end
 
       def is_alias? obj, alias_meth
@@ -41,7 +41,7 @@ module RSpec::Sugar
 
       def negative_failure_message
         "Did not expect aliases to exist but, #{cause_msg}".gsub /NOT/, ''
-      end          
+      end
     end
 
     def have_aliases method, *alias_methods

data/lib/sugar-high/string.rb

@@ -16,7 +16,7 @@ class String
 
 
   def concats *args
-    args.inject(self) do |res, arg| 
+    args.inject(self) do |res, arg|
       res << arg.to_s
       res
     end

data/spec/sugar-high/alias_spec.rb

@@ -1,6 +1,6 @@
 # multi_alias name, :create => :new, :insert_into => [:inject_into, :update], :read => :X_content
-#                   :options => :after  
-# 
+#                   :options => :after
+#
 # create_xxx becomes new_xxx
 # insert_into_xxx becomes inject_into_xxx and update_xxx
 # read_xxx becomes xxx_content (overriding default :after action to insert at the X)
@@ -15,7 +15,7 @@ class Abc
   multi_alias :_after_ => :kristian, :hello => :howdy
 end
 
-class Xyz  
+class Xyz
   def hello_kristian
     'hi'
   end
@@ -23,46 +23,46 @@ class Xyz
   multi_alias :kristian, :hello => :alloha
 end
 
-class Ged  
+class Ged
   def kristian_hello
     'hejsa'
   end
-  
-  multi_alias :_before_ => :kristian, :hejsa => :hello, :_direction_ => :reverse  
-end  
+
+  multi_alias :_before_ => :kristian, :hejsa => :hello, :_direction_ => :reverse
+end
 
 class Plural
   def monster
     'monster'
   end
-  
+
   alias_for :monster, :pluralize => true
-end  
+end
 
 class Plural2
   def monster
     'monster'
   end
-  
+
   alias_for :monster, :beast, :pluralize => true
-end  
+end
 
 
 class Singular
   def monsters
     'monsters'
   end
-  
+
   alias_for :monsters, :singularize => true
-end  
+end
 
 class Singular2
   def monsters
     'monsters'
   end
-  
+
   alias_for :monsters, :beasts, :singularize => true
-end  
+end
 
 
 class AliasHash
@@ -74,9 +74,9 @@ class AliasHash
     'monster'
   end
 
-  
+
   alias_hash :monsters => :beasts, :singularize => true
-end  
+end
 
 
 class Wow
@@ -93,11 +93,11 @@ class Wow
       end
     }
   end
-  multi_alias REGISTRATION_LINKS.merge(:_after_ => :link)  
+  multi_alias REGISTRATION_LINKS.merge(:_after_ => :link)
 end
-     
+
 describe "SugarHigh" do
-  describe "Arguments" do    
+  describe "Arguments" do
     context 'should alias :hello_kristian with :howdy_kristian ' do
       it "should find alias" do
         Abc.new.respond_to?(:howdy_kristian).should be_true
@@ -131,7 +131,7 @@ describe "SugarHigh" do
     it "should find nice aliases from using alias_hash" do
       ah = AliasHash.new
       ah.beasts.should == 'monsters'
-      ah.beast.should == 'monster'      
+      ah.beast.should == 'monster'
     end
 
 

data/spec/sugar-high/arguments_spec.rb

@@ -3,13 +3,13 @@ require 'sugar-high/arguments'
 
 describe "SugarHigh" do
   describe "Arguments" do
-    
+
     context 'Symbol' do
       it "should return arg list with 'hello'" do
         :hello.args.should == ['hello']
       end
     end
-    
+
     context 'String' do
       it "should return arg list with 'hello'" do
         :hello.args.should == ['hello']
@@ -28,23 +28,23 @@ describe "SugarHigh" do
           end
 
           it "should return the :hello => 'abe' " do
-            [{:hi => :def}, 3, 4, :hi => 'abe'].last_arg.should == {:hi => 'abe'}
-            [{:hi => :def}, [3,4, :hi => 'abe']].last_arg.should == {:hi => 'abe'}
+            [{:hi => :def}, 3, 4, {:hi => 'abe'}].last_arg.should == {:hi => 'abe'}
+            [{:hi => :def}, [3,4, {:hi => 'abe'}]].last_arg.should == {:hi => 'abe'}
           end
         end
       end
 
-      describe '#last_option' do      
+      describe '#last_option' do
         it "should return the last hash" do
-          [3,4, :x => 3, :y => 5].last_option.should == {:x => 3, :y => 5} 
+          [3,4, {:x => 3, :y => 5}].last_option.should == {:x => 3, :y => 5}
         end
       end
-      
+
       describe "Last argument value" do
         context 'Last arg with default hello' do
           it "should return the arg value 'abe' " do
-            [3,4, :hi => 'abe'].last_arg_value(:hi => :def).should == 'abe'
-            [[3,4, :hi => 'abe']].last_arg_value(:hi => :def).should == 'abe'          
+            [3,4, {:hi => 'abe'}].last_arg_value(:hi => :def).should == 'abe'
+            [[3,4, {:hi => 'abe'}]].last_arg_value(:hi => :def).should == 'abe'
           end
 
           it "should return the arg value :def " do
@@ -55,7 +55,7 @@ describe "SugarHigh" do
             [3,4].last_arg_value(:hi => :def).should == :def
           end
         end
-      end      
+      end
     end
 
     describe "Last argument" do
@@ -66,8 +66,8 @@ describe "SugarHigh" do
 
         it "should return the :hello => 'abe' " do
           last_arg({:hi => :def}, 3,4, :hi => 'abe').should == {:hi => 'abe'}
-          last_arg({:hi => :def}, [3,4, :hi => 'abe']).should == {:hi => 'abe'}
-        end          
+          last_arg({:hi => :def}, [3,4, {:hi => 'abe'}]).should == {:hi => 'abe'}
+        end
       end
     end
 
@@ -75,7 +75,7 @@ describe "SugarHigh" do
       context 'Last arg with default hello' do
         it "should return the arg value 'abe' " do
           last_arg_value({:hi => :def}, 3,4, :hi => 'abe').should == 'abe'
-          last_arg_value({:hi => :def}, [3,4, :hi => 'abe']).should == 'abe'          
+          last_arg_value({:hi => :def}, [3,4, {:hi => 'abe'}]).should == 'abe'
         end
 
         it "should return the arg value :def " do
@@ -91,16 +91,16 @@ describe "SugarHigh" do
     describe "Last option" do
       context 'Last arg is Hash' do
         it "should return the last hash" do
-          last_option(3,4, :x => 3, :y => 5).should == {:x => 3, :y => 5} 
+          last_option(3,4, :x => 3, :y => 5).should == {:x => 3, :y => 5}
         end
       end
 
       context 'Last arg is NOT Hash' do
         it "should return an empty hash" do
-          last_option(3,4,3).should == {} 
+          last_option(3,4,3).should == {}
         end
       end
-    end      
+    end
   end
 end
 

data/spec/sugar-high/array_spec.rb

@@ -4,7 +4,7 @@ require 'sugar-high/array'
 describe "SugarHigh" do
   describe "Array ext" do
 
-    describe '#to_symbols' do    
+    describe '#to_symbols' do
       it "should translate invalid array into empty array" do
         [1, nil].to_symbols.should == []
       end
@@ -14,90 +14,96 @@ describe "SugarHigh" do
       end
 
       it "should translate nested array of numbers and strings into symbols only array, including numbers" do
-        [[1, 'blip', [3, "hello"]]].to_symbols_num.should == [:_1, :blip, :_3, :hello]        
+        [[1, 'blip', [3, "hello"]]].to_symbols_num.should == [:_1, :blip, :_3, :hello]
       end
 
       it "should translate nested array of numbers and strings into symbols only array, including numbers" do
-        [[1, 'blip', [1, "hello"]]].to_symbols_uniq.should include :blip, :hello        
+        [[1, 'blip', [1, "hello"]]].to_symbols_uniq.should include :blip, :hello
       end
-    end        
+    end
 
-    describe '#to_symbols!' do    
+    describe '#to_symbols!' do
       it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
         x = [1, 'hello', 'blip', [3, "hello"]].to_symbols!
         x.should include :hello, :blip
       end
-      
+
       it "should translate invalid array into empty array" do
         x = [1, nil].to_symbols!
         x.should == []
-      end      
+      end
     end
-    
-    describe '#to_strings' do    
+
+    describe '#to_strings' do
       it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
         [1, 'blip', [3, "hello"]].to_strings.should == ['blip', 'hello']
-      end      
-    end    
+      end
+    end
 
-    describe '#to_strings' do    
+    describe '#to_strings' do
       it "should translate invalid array into empty array" do
         x = [1, nil].to_strings!
         x.should == []
-      end      
+      end
 
       it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
         x = [1, 'blip', [3, "hello"]].to_strings!
         x.should == ['blip', 'hello']
-      end      
-    end    
+      end
+    end
 
-    describe '#flat_uniq' do    
+    describe '#flat_uniq' do
       it "should flatten array, remove nils and make unique" do
         [1, 'blip', ['blip', nil, 'c'], nil].flat_uniq.should == [1, 'blip', 'c']
-      end      
+      end
 
       it "should return empty list if called on nil" do
         nil.flat_uniq.should == []
-      end      
-    end    
+      end
+    end
 
-    describe '#flat_uniq!' do    
+    describe '#flat_uniq!' do
       it "should translate invalid array into empty array" do
         x = [1, nil].to_strings!
         x.should == []
-      end      
+      end
 
       it "should flatten array, remove nils and make unique" do
         x = [1, 'blip', ['blip', nil, 'c'], nil]
         x.flat_uniq!
         x.should == [1, 'blip', 'c']
       end
-    end    
+    end
 
-    describe '#sum' do    
+    describe '#sum' do
       it "should add elements in array" do
         [1, 2, 3].extend(MathArray).sum.should == 6
-      end      
+      end
     end
 
-    describe '#mean' do    
+    describe '#mean' do
       it "should find mean of elements in array" do
         [1, 2, 3].extend(MathArray).mean.should == 2
-      end      
+      end
     end
 
-    describe '#extract' do    
+    describe '#extract' do
       it "should call method on each element in array" do
         ["a", "ab", "abc"].extract(:size).extend(MathArray).mean.should == 2
-      end      
-    end    
+      end
+    end
 
-    describe '#none?' do    
+    describe '#none?' do
       it "should be none if no real values in array" do
         [nil, nil].none?.should be_true
-        nil.none?.should be_true        
-      end      
-    end    
+        nil.none?.should be_true
+      end
+    end
+
+    describe '#select!' do
+      arr = [1, 2, 3, 4]
+      arr.select!{|el| el % 2 == 0}
+      arr.should == [2, 4]
+    end
   end
 end