namedarguments 0.0.3 → 0.0.5

data/History.txt

@@ -1,4 +1,5 @@
-== 0.0.1 / 2006-12-04
-
-* 1 major enhancement
-  * L� breithe!
+== 1.0.0 / 2007-06-03
+
+* 1 major enhancement
+  * Birthday!
+

data/Manifest.txt

@@ -1,10 +1,10 @@
-History.txt
-Manifest.txt
-README.txt
-Rakefile
-bin/named_arguments
-lib/named_arguments.rb
-lib/hash_extended_tools.rb
-lib/singleton_creator_mixin.rb
-lib/class_settings_mixin.rb
-test/test_named_arguments.rb
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+lib/named_arguments.rb
+lib/named_arguments/class_settings_mixin.rb
+lib/named_arguments/hash_extended_tools.rb
+lib/named_arguments/method_extensions.rb
+test/unit/named_arguments_test.rb
+test/test_helper.rb

data/README.txt

@@ -1,52 +1,48 @@
-NamedArguments
-    by James M. Moore
-
-== DESCRIPTION:
-
-Adds the ability to call class constructors with a hash of arguments to
-initialize attributes in the new object.
-
-== FEATURES/PROBLEMS:
-  
-  class Snark
-    include NamedArguments
-    
-    attr_accessor :color, :size, :name
-    
-    attribute_defaults :color => 'blue', :size => lambda {|s| some_method_call(s)}
-    required_fields :color, :name
-    required_respond_to :name => :to_s
-    required_kind_of? :size => Fixnum
-    type_conversion :size => Fixnum
-  end
-
-  s = Snark.new :boojum => 7, :color => red
-
-== INSTALL:
-
-gem install namedarguments
-
-== LICENSE:
-
-(The MIT License)
-
-Copyright (c) 2006 James M. Moore
-
-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.
+namedarguments
+    by FIX (your name)
+    FIX (url)
+
+== DESCRIPTION:
+  
+FIX (describe your package)
+
+== FEATURES/PROBLEMS:
+  
+* FIX (list of features or problems)
+
+== SYNOPSIS:
+
+  FIX (code sample of usage)
+
+== REQUIREMENTS:
+
+* FIX (list of requirements)
+
+== INSTALL:
+
+* FIX (sudo gem install, anything else)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2007 FIX
+
+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/Rakefile

@@ -1,12 +1,17 @@
+# -*- ruby -*-
+
 require 'rubygems'
 require 'hoe'
 require './lib/named_arguments.rb'
 
 Hoe.new('namedarguments', NamedArguments::VERSION) do |p|
-  p.summary = 'Provide named arguments (hashes) to constructors to initialize attributes.'
-  p.author = "James M Moore"
-  p.email = 'james@phonesonrails.com'
-  p.description = p.paragraphs_of('README.txt', 2..5).join("\n\n")
+  p.rubyforge_name = 'namedarguments'
+  # p.author = 'FIX'
+  # p.email = 'FIX'
+  # p.summary = 'FIX'
+  # p.description = p.paragraphs_of('README.txt', 2..5).join("\n\n")
   # p.url = p.paragraphs_of('README.txt', 0).first.split(/\n/)[1..-1]
   p.changes = p.paragraphs_of('History.txt', 0..1).join("\n\n")
 end
+
+# vim: syntax=Ruby

data/lib/named_arguments.rb

@@ -1,6 +1,6 @@
-require File.dirname(__FILE__) + '/class_settings_mixin'
-require File.dirname(__FILE__) + '/hash_extended_tools'
-require File.dirname(__FILE__) + '/singleton_creator_mixin'
+require File.dirname(__FILE__) + '/named_arguments/method_extensions'
+require File.dirname(__FILE__) + '/named_arguments/hash_extended_tools'
+require File.dirname(__FILE__) + '/named_arguments/class_settings_mixin'
 
 # Adds the following features to a class:
 # 
@@ -27,14 +27,24 @@ require File.dirname(__FILE__) + '/singleton_creator_mixin'
 #  
 # = See also
 # 
-# See NamedArgumentsClassMethods for more methods:
+# See ClassMethods for more methods:
 # 
-# * NamedArgumentsClassMethods#type_converter
-# * NamedArgumentsClassMethods#option_attr
+# * ClassMethods#type_converter
+# * ClassMethods#option_attr
 module NamedArguments
-  VERSION = '0.0.3'
+  VERSION = '0.0.5'
   
-  include HashExtendedTools
+  def self.included target # :nodoc:
+    target.class_eval do
+      include HashExtendedTools
+      include ClassSettingsMixin
+      extend ClassMethods
+      create_class_settings_method :required_fields
+      create_class_settings_method :required_kind_of
+      create_class_settings_method :required_respond_to
+      create_class_settings_method :attribute_defaults
+    end
+  end
   
   # Requires that object.snark.kind_of? String be true
   # on the call to initialize.
@@ -84,15 +94,6 @@ module NamedArguments
     # Dummy for rdoc
   end
   
-  def self.included target # :nodoc:
-    target.send :include, ClassSettingsMixin
-    target.send :extend, NamedArgumentsClassMethods
-    target.send :create_class_settings_method, :required_fields
-    target.send :create_class_settings_method, :required_kind_of
-    target.send :create_class_settings_method, :required_respond_to
-    target.send :create_class_settings_method, :attribute_defaults
-  end
-  
   # Set the attributes for this object.  Normally called
   # by initialize.
   
@@ -108,9 +109,9 @@ module NamedArguments
   def set_default_attributes(args) # :nodoc:
     defaults = {}
      (attribute_defaults? || {}).each_pair do |k, v|
-      if v.kind_of? Class
+      if Class === v
         result = v.new
-      elsif v.kind_of? Proc
+      elsif Proc === v
         result = v.call self
       elsif v.class == Array and v.empty?
         result = Array.new
@@ -124,7 +125,8 @@ module NamedArguments
     args = defaults.merge args
     args.each_pair do
       |k, v|
-      self.send("#{k}=", v)
+      m = "#{k}="
+      send m, v if respond_to? m
     end
   end
   
@@ -143,9 +145,8 @@ module NamedArguments
   # See also: required_fields
   
   def check_required_field(fields_set) # :nodoc:
-   (required_fields? || []).each do
-      |f|
-      raise NamedArgumentException.new("Must set parameter: " + f.to_s) unless fields_set.has_key? f.to_sym
+   (required_fields? || []).each do |f|
+      raise ParameterRequired, "Must set parameter: " + f.to_s unless fields_set.has_key? f.to_sym
     end
   end
   
@@ -157,16 +158,14 @@ module NamedArguments
   # * #set_default_attributes
   
   def check_required_kind # :nodoc:
-   (required_kind_of? || {}).each_pair do
-      |k, v|
-      raise NamedArgumentException.new("Wrong class: #{k.to_s}; should have been #{v.to_s}, object is #{self.send(k).inspect}") unless self.send(k).kind_of?(v)
+   (required_kind_of? || {}).each_pair do |k, v|
+      raise WrongClass.new("Wrong class: #{k.to_s}; should have been #{v.to_s}, object is #{self.send(k).inspect}") unless v === self.send(k)
     end
   end
   
   def check_required_respond_to # :nodoc:
-   (required_respond_to? || {}).each_pair do
-      |k, v|
-      raise NamedArgumentException.new("#{k} must respond to #{v}; the object is #{self.send(k).inspect}") unless self.send(k).respond_to?(v)
+   (required_respond_to? || {}).each_pair do |k, v|
+      raise MustRespondTo.new("#{k} must respond to #{v}; the object is #{self.send(k).inspect}") unless self.send(k).respond_to?(v)
     end
   end
   
@@ -186,7 +185,6 @@ module NamedArguments
       super()
     end
     attributes_set args
-    yield self if block_given?
   end
   
   def option_attr_get k  # :nodoc:
@@ -214,7 +212,7 @@ module NamedArguments
   # Class methods (methods of the class
   # object itself) provided when 
   # NamedArguments in included.
-  module NamedArgumentsClassMethods
+  module ClassMethods
     def option_attr *array_of_names
       array_of_names.each { |n| 
         define_method n, lambda {
@@ -231,7 +229,7 @@ module NamedArguments
       setter_method_name = (field.to_s + '=').to_sym
       alias_method alias_name, setter_method_name
       send :define_method, setter_method_name do |rhs|
-        if [Fixnum].member? new_klass
+        if Integer === new_klass
           v = rhs.to_i
         elsif new_klass == String
           v = rhs.to_s
@@ -239,7 +237,7 @@ module NamedArguments
           v = rhs.to_sym
         elsif new_klass == :boolean
           v = !!rhs
-        elsif new_klass.kind_of? Proc
+        elsif Proc === new_klass
           v = new_klass.call v
         else
           v = new_klass.new rhs
@@ -248,8 +246,13 @@ module NamedArguments
       end
     end
   end
+  
+  class Error < RuntimeError; end
+  class ParameterRequired < Error; end 
+  class WrongClass < Error; end 
+  class MustRespondTo < Error; end 
 end
 
-# Exception class thrown by NamedArguments methods.
-class NamedArgumentException < Exception
-end
+# If Rails isn't around, fake ActiveRecord
+module ActiveRecord; end;
+class ActiveRecord::Base; end

data/lib/named_arguments/class_settings_mixin.rb

@@ -0,0 +1,122 @@
+module NamedArguments
+  module ClassSettingsMixin
+    def self.included target
+      target.class_eval do 
+        include NamedArguments::MethodExtensions
+        extend ClassMethods
+      end
+    end
+    
+    module ClassMethods
+      include NamedArguments::MethodExtensions
+      
+      def self.included target
+        target.class_eval do 
+          include NamedArguments::MethodExtensions
+        end
+      end
+      
+      # Allow you to define 
+      # methods that set a class value hash
+      # and an accessor for that hash.
+      # 
+      # Example:
+      # 
+      #   create_class_settings_method :settings
+      # 
+      # creates:
+      # 
+      # settings:: A class method that allows
+      #            you to set variables
+      # settings?:: The current value of those variables
+      # 
+      #   class BlueCar
+      #     create_class_settings_method :settings
+      #     create_class_settings_method :has_these
+      #   
+      #     settings :color => :blue, :another_settting => 10
+      #     settings :painted => true
+      #     has_these :doors, :windows
+      #     has_these :wheels
+      #   end
+      # 
+      #   class Convertable < BlueCar
+      #     has_these :poptop
+      #   end
+      # 
+      #   BlueCar.color
+      #     => :blue
+      # 
+      #   BlueCar.new.settings?
+      #     => {:color => :blue, :painted => true, :another_settting => 10}
+      def create_class_settings_method name
+        # Build the class methods first
+        l = class_setting_lambda name
+        define_method_with_context name, &l
+        
+        # Allow #name? to be called as an instance method
+        # and default its return value to nil.
+        # This will be replaced on any call to the 
+        # setter.
+        value_name = value_field_identifier(name)
+        instance_method = lambda {nil}
+        define_method value_name, instance_method
+      end
+      
+      protected 
+      
+      # Returns a lambda that will create
+      # two methods:
+      # 
+      # A singleton method on the current object
+      #   that takes multiple parameters and 
+      #   stores their values.  This allows
+      #   you to define methods on the class
+      #   that will save their parameters.
+      # An instance method that returns those
+      #   saved parameters
+      def class_setting_lambda name #:nodoc:
+        value_field_id = value_field_identifier name
+        result = lambda do
+          # Note that this lambda is called
+          # either with a single argument
+          # containing a hash, or an array 
+          # of arguments.
+          |*args|
+          
+          if args.first.kind_of? Hash
+            args = args.first
+          end
+          
+          begin
+            current_value = self.send value_field_id
+            case current_value
+            when Array then val = merge_arrays_of_symbols current_value, args
+            when Hash then val = current_value.merge args
+            else
+              raise RuntimeError.new("Attempting to merge two different kinds of data")
+            end
+          rescue NoMethodError
+            val = args
+          end
+          
+          # Define the class method
+          define_method_with_value value_field_id, val
+          
+          # Define the instance method
+          define_method value_field_id, lambda {val}
+        end
+        result
+      end
+      
+      def value_field_identifier name #:nodoc:
+        return "#{name}?"
+      end
+      
+      def merge_arrays_of_symbols a, b #:nodoc:
+        result = a.map(&:to_sym) + b.map(&:to_sym)
+        result.uniq
+      end
+    end
+  end
+end

data/lib/named_arguments/hash_extended_tools.rb

@@ -0,0 +1,94 @@
+module NamedArguments
+  # Provides several hash utilities.
+  # 
+  # Note that you need to extend your hash with this module:
+  # 
+  #   hash = {}
+  #   hash.extend HashExtendedTools
+  #   hash = hash.exclude :foo, :bar
+  # 
+  # Or create a new class:
+  # 
+  #   class HashWithExtendedTools < Hash
+  #     include HashExtendedTools
+  #   end
+  module HashExtendedTools
+    # Change keys in a hash.
+    # 
+    # Pass in a hash of:
+    # 
+    #   old_key => new_key
+    # 
+    # Any keys matching +old_key+ will be
+    # deleted and a new entry created with
+    # the same value and the new key.
+    def switch_keys args = {}
+      args.each_pair do
+        |old_key, new_key|
+        if self.has_key?(old_key)
+          self[new_key] = self[old_key]
+          delete(old_key)
+        end
+      end
+      self
+    end
+    
+    # Return a new hash not including
+    # keys that are contained in 
+    # +keys_to_exclude+.
+    # 
+    # Keys that match entries in 
+    # +keys_to_exclude+ are deleted if
+    # either they match as string or a 
+    # symbol (created with to_sym).
+    def exclude *keys_to_exclude
+      result = self.dup
+      keys_to_exclude.each do |k|
+        result.delete k.to_s
+        result.delete k.to_sym
+      end
+      result
+    end
+    
+    # Given an array of keys,
+    # return a hash containing
+    # the key/value pairs
+    # for the matching keys.
+    # 
+    # Values that are nil are not
+    # returned.
+    def slice *slice_keys
+      result = {}
+      slice_keys.each do |k|
+        result[k] = self[k] unless self[k].nil?
+      end
+      result
+    end
+    
+    # Return the given attributes as a hash containing
+    # attribute => value pairs.
+    # 
+    #  obj.a = 10
+    #  obj.b = 20
+    #  attributes_as_hash(:a, :b) 
+    #    => {:a => 10, :b => 20}
+    def attributes_as_hash *attrs
+      result = {}
+      attrs.each do |a|
+        v = self.send a
+        result[a] = v unless v.nil?
+      end
+      result
+    end
+    
+    def symbol_keys_as_strings
+      sym_keys = self.keys.select {|k| k.kind_of? Symbol}
+      new_keys = {}
+      sym_keys.each {|k| new_keys[k] = k.to_s}
+      result = dup
+      result.extend HashExtendedTools
+      result.switch_keys new_keys
+      result
+    end
+  end
+end

data/lib/named_arguments/method_extensions.rb

@@ -0,0 +1,51 @@
+module NamedArguments
+  # Adds two methods to a class:
+  # 
+  # define_method_with_context
+  # define_method_with_value
+  module MethodExtensions
+    def self.included target
+      target.class_eval do
+        include ExtendedDefines
+        extend ExtendedDefines
+      end
+    end
+    
+    module ExtendedDefines
+      # Create a method out of a
+      # name and a lambda.
+      # 
+      # Example:
+      # 
+      #   my_lambda = lambda {13}
+      #   define_method_with_context :return_13, my_lambda
+      # 
+      #   assert 13 == self.return_13
+      def define_method_with_context method_name, &block
+        sclass = class << self; self end
+        sclass.send(:define_method, method_name, block)
+        sclass.send(:public, method_name)
+      end
+      
+      # Create a method out of a
+      # value and a name
+      # The method will return the value.
+      # 
+      # Example:
+      # 
+      #   define_method_with_value :return_14, 14
+      # 
+      #   assert 14 == self.return_14
+      def define_method_with_value name, value
+        define_method_with_context name do
+          value
+        end
+      end
+      
+      def define_method_noop name
+        define_method_with_context name do
+        end
+      end
+    end
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,2 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../lib/named_arguments'

data/test/unit/named_arguments_test.rb

@@ -0,0 +1,59 @@
+require File.dirname(__FILE__) + '/../test_helper'
+require 'test/unit'
+
+class NamedArgumentsTest < Test::Unit::TestCase
+  class TestClassAttributeDefaults
+    include NamedArguments
+    attr_accessor :foo, :bar
+    attribute_defaults :foo => 3
+    attribute_defaults :bar => 'bar'
+  end
+  
+  class TestClassRequiredFields
+    include NamedArguments
+    required_fields :foo, :bar
+    attr_accessor :foo, :bar
+  end
+  
+  class TestClassTypeConverter
+    include NamedArguments
+    attr_accessor :foo
+    type_converter :foo, String
+  end
+  
+  #  attribute_defaults :color => 'blue', :size => lambda {|s| some_method_call(s)}
+  #    required_fields :color, :name
+  #    required_respond_to :name => :to_s
+  #    required_kind_of? :size => Fixnum
+  #    type_converter :size => Fixnum
+  def test_attribute_defaults
+    o = TestClassAttributeDefaults.new
+    assert_equal 3, o.foo
+    assert_equal 'bar', o.bar
+    o = TestClassAttributeDefaults.new :bar => 7
+    assert_equal 7, o.bar
+  end
+  
+  def test_required_fields
+    assert_raises NamedArguments::ParameterRequired do
+      o = TestClassRequiredFields.new
+    end
+  end
+  
+  def test_required_respond_to
+  end
+  
+  def type_converter
+    o = TestClassTypeConverter.new :foo => 3
+    assert_equal '3', o.foo
+    
+    o = TestClassTypeConverter.new :foo => 3
+    assert_equal '3', o.foo
+  end
+  
+  def test_includes
+    t = TestClassTypeConverter.new
+    t.define_method_with_value :test_method, 7
+    assert_equal 7, t.test_method
+  end
+end

metadata

@@ -1,17 +1,17 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.11
+rubygems_version: 0.9.4
 specification_version: 1
 name: namedarguments
 version: !ruby/object:Gem::Version 
-  version: 0.0.3
-date: 2006-12-06 00:00:00 -08:00
-summary: Provide named arguments (hashes) to constructors to initialize attributes.
+  version: 0.0.5
+date: 2007-06-03 00:00:00 -07:00
+summary: The author was too lazy to write a summary
 require_paths: 
 - lib
-email: james@phonesonrails.com
+email: ryand-ruby@zenspider.com
 homepage: http://www.zenspider.com/ZSS/Products/namedarguments/
 rubyforge_project: namedarguments
-description: "Adds the ability to call class constructors with a hash of arguments to initialize attributes in the new object.  == FEATURES/PROBLEMS:  class Snark include NamedArguments  attr_accessor :color, :size, :name  attribute_defaults :color => 'blue', :size => lambda {|s| some_method_call(s)} required_fields :color, :name required_respond_to :name => :to_s required_kind_of? :size => Fixnum type_conversion :size => Fixnum end  s = Snark.new :boojum => 7, :color => red  == INSTALL:"
+description: The author was too lazy to write a description
 autorequire: 
 default_executable: 
 bindir: bin
@@ -25,27 +25,31 @@ required_ruby_version: !ruby/object:Gem::Version::Requirement
 platform: ruby
 signing_key: 
 cert_chain: 
+post_install_message: 
 authors: 
-- James M Moore
+- Ryan Davis
 files: 
 - History.txt
 - Manifest.txt
 - README.txt
 - Rakefile
-- bin/named_arguments
 - lib/named_arguments.rb
-- lib/hash_extended_tools.rb
-- lib/singleton_creator_mixin.rb
-- lib/class_settings_mixin.rb
-- test/test_named_arguments.rb
+- lib/named_arguments/class_settings_mixin.rb
+- lib/named_arguments/hash_extended_tools.rb
+- lib/named_arguments/method_extensions.rb
+- test/unit/named_arguments_test.rb
+- test/test_helper.rb
 test_files: 
-- test/test_named_arguments.rb
-rdoc_options: []
-
-extra_rdoc_files: []
+- test/test_helper.rb
+rdoc_options: 
+- --main
+- README.txt
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+executables: []
 
-executables: 
-- named_arguments
 extensions: []
 
 requirements: []
@@ -58,5 +62,5 @@ dependencies:
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
-        version: 1.1.6
+        version: 1.2.1
     version: 

data/lib/class_settings_mixin.rb

@@ -1,113 +0,0 @@
-require File.dirname(__FILE__) + '/singleton_creator_mixin'
-
-module ClassSettingsMixin
-  def self.included target
-    target.send :extend, ClassSettingsMixinClassMethods
-  end
-end
-
-module ClassSettingsMixinClassMethods
-  include SingletonMethodCreatorMixin
-  
-  # Allow you to define 
-  # methods that set a class value hash
-  # and an accessor for that hash.
-  # 
-  # Example:
-  # 
-  #   create_class_settings_method :settings
-  # 
-  # creates:
-  # 
-  # settings:: A class method that allows
-  #            you to set variables
-  # settings?:: The current value of those variables
-  # 
-  #   class BlueCar
-  #     create_class_settings_method :settings
-  #     create_class_settings_method :has_these
-  #   
-  #     settings :color => :blue, :another_settting => 10
-  #     settings :painted => true
-  #     has_these :doors, :windows
-  #     has_these :wheels
-  #   end
-  # 
-  #   class Convertable < BlueCar
-  #     has_these :poptop
-  #   end
-  # 
-  #   BlueCar.color
-  #     => :blue
-  # 
-  #   BlueCar.new.settings?
-  #     => {:color => :blue, :painted => true, :another_settting => 10}
-  def create_class_settings_method name
-    # Build the class methods first
-    l = class_setting_lambda name
-    create_singleton_method name, l
-    
-    # Allow #name? to be called as an instance method
-    # and default its return value to nil.
-    # This will be replaced on any call to the 
-    # setter.
-    value_name = value_field_identifier(name)
-    instance_method = lambda {nil}
-    define_method value_name, instance_method
-  end
-  
-  protected 
-  
-  # Returns a lambda that will create
-  # two methods:
-  # 
-  # A singleton method on the current object
-  #   that takes multiple parameters and 
-  #   stores their values.  This allows
-  #   you to define methods on the class
-  #   that will save their parameters.
-  # An instance method that returns those
-  #   saved parameters
-  def class_setting_lambda name #:nodoc:
-    value_field_id = value_field_identifier name
-    result = lambda do
-      # Note that this lambda is called
-      # either with a single argument
-      # containing a hash, or an array 
-      # of arguments.
-      |*args|
-      
-      if args.first.kind_of? Hash
-        args = args.first
-      end
-      
-      begin
-        current_value = self.send value_field_id
-        case current_value
-        when Array then val = merge_arrays_of_symbols current_value, args
-        when Hash then val = current_value.merge args
-        else
-          raise RuntimeError.new("Attempting to merge two different kinds of data")
-        end
-      rescue NoMethodError
-        val = args
-      end
-      
-      # Define the class method
-      create_singleton_value_method value_field_id, val
-      
-      # Define the instance method
-      define_method value_field_id, lambda {val}
-    end
-    result
-  end
-  
-  def value_field_identifier name #:nodoc:
-    return "#{name}?"
-  end
-  
-  def merge_arrays_of_symbols a, b #:nodoc:
-    result = a.map(&:to_sym) + b.map(&:to_sym)
-    result.uniq
-  end
-end

data/lib/hash_extended_tools.rb

@@ -1,81 +0,0 @@
-# Provides several hash utilities.
-# 
-# Note that you need to extend your hash with this module:
-# 
-#   hash = {}
-#   hash.extend HashExtendedTools
-#   hash = hash.exclude :foo, :bar
-# 
-# Or create a new class:
-# 
-#   class HashWithExtendedTools < Hash
-#     include HashExtendedTools
-#   end
-module HashExtendedTools
-  # Change keys in a hash.
-  # 
-  # Pass in a hash of:
-  # 
-  #   old_key => new_key
-  # 
-  # Any keys matching +old_key+ will be
-  # deleted and a new entry created with
-  # the same value and the new key.
-  def switch_keys args = {}
-    args.each_pair do
-      |old_key, new_key|
-      if self.has_key?(old_key)
-        self[new_key] = self[old_key]
-        delete(old_key)
-      end
-    end
-  end
-  
-  # Return a new hash not including
-  # keys that are contained in 
-  # +keys_to_exclude+.
-  # 
-  # Keys that match entries in 
-  # +keys_to_exclude+ are deleted if
-  # either they match as string or a 
-  # symbol (created with to_sym).
-  def exclude *keys_to_exclude
-    result = self.dup
-    keys_to_exclude.each do |k|
-      result.delete k.to_s
-      result.delete k.to_sym
-    end
-    result
-  end
-  
-  # Given an array of keys,
-  # return a hash containing
-  # the key/value pairs
-  # for the matching keys.
-  # 
-  # Values that are nil are not
-  # returned.
-  def slice *slice_keys
-    result = {}
-    slice_keys.each do |k|
-      result[k] = self[k] unless self[k].nil?
-    end
-    result
-  end
-  
-  # Return the given attributes as a hash containing
-  # attribute => value pairs.
-  # 
-  #  obj.a = 10
-  #  obj.b = 20
-  #  attributes_as_hash(:a, :b) 
-  #    => {:a => 10, :b => 20}
-  def attributes_as_hash *attrs
-    result = {}
-    attrs.each do |a|
-      v = self.send a
-      result[a] = v unless v.nil?
-    end
-    result
-  end
-end

data/lib/singleton_creator_mixin.rb

@@ -1,29 +0,0 @@
-module SingletonMethodCreatorMixin
-  # Create a method out of a
-  # name and a lambda.
-  # 
-  # Example:
-  # 
-  #   my_lambda = lambda {13}
-  #   create_singleton_method :return_13, my_lambda
-  # 
-  #   assert 13 == self.return_13
-  def create_singleton_method method_name, lambda_obj
-    sclass = class << self; self end
-    sclass.send(:define_method, method_name, lambda_obj)
-    sclass.send(:public, method_name)
-  end
-  
-  # Create a method out of a
-  # value and a name
-  # The method will return the value.
-  # 
-  # Example:
-  # 
-  #   create_singleton_value_method :return_14, 14
-  # 
-  #   assert 14 == self.return_14
-  def create_singleton_value_method name, value
-    create_singleton_method(name, lambda { value })
-  end
-end