ducktape 0.3.1 → 0.3.2

data/lib/ducktape/bindable.rb

@@ -6,14 +6,28 @@ module Ducktape
     end
   end
 
+  class InconsistentAccessorError < StandardError
+    def initialize(writeonly, name)
+      type, accessor = writeonly ? [:Write, :getter] : [:Read, :setter]
+      super("#{type} only property with a custom #{accessor}: #{name}")
+    end
+  end
+
   module Bindable
     module ClassMethods
       def bindable(name, options = {})
         name = name.to_s
+        options[:access] ||= :both
         m = BindableAttributeMetadata.new(metadata(name) || name, options)
         bindings_metadata[name] = m
-        define_method name, ->() { get_value(name) } unless options[:access] == :writeonly
-        define_method "#{name}=", ->(value) { set_value(name, value) } unless options[:access] == :readonly
+        raise InconsistentAccessorError.new(true, name)  if options[:access] == :writeonly && options[:getter]
+        raise InconsistentAccessorError.new(false, name) if options[:access] == :readonly && options[:setter]
+
+        define_method name, options[:getter] || ->() { get_value(name) } unless options[:access] == :writeonly
+
+        unless options[:access] == :readonly
+          define_method "#{name}=", options[:setter] || ->(value) { set_value(name, value) }
+        end
         nil
       end
 

data/lib/ducktape/bindable_attribute.rb

@@ -79,10 +79,10 @@ module Ducktape
         old_value = @value
         @value = value
 
-        old_value.remove_hook('on_changed', method('hookable_value_changed')) if old_value.respond_to?('on_changed')
-        @value.on_changed(method('hookable_value_changed')) if @value.respond_to?('on_changed')
+        old_value.remove_hook(:on_changed, method(:hookable_value_changed)) if old_value.is_a?(Hookable)
+        @value.on_changed(method(:hookable_value_changed)) if @value.is_a?(Hookable)
 
-        call_hooks('on_changed', owner, attribute: name.dup, value: @value, old_value: old_value)
+        call_hooks(:on_changed, owner, attribute: name.dup, value: @value, old_value: old_value)
       end
 
       propagate_value(exclusions)

data/lib/ducktape/bindable_attribute_metadata.rb

@@ -1,9 +1,9 @@
 module Ducktape
   class BindableAttributeMetadata
 
-    VALID_OPTIONS = [:access, :default, :validate, :coerce].freeze
+    VALID_OPTIONS = [:access, :coerce, :default, :getter, :setter, :validate].freeze
 
-    attr_reader :name
+    attr_reader :name, :access, :getter, :setter
 
     def initialize(name, options = {})
 
@@ -15,11 +15,17 @@ module Ducktape
         @default    = options.has_key?(:default) ? options[:default] : name.instance_variable_get(:@default)
         @validation = options.has_key?(:validate) ? options[:validate] : name.instance_variable_get(:@validation)
         @coercion   = options.has_key?(:coerce) ? options[:coerce] : name.instance_variable_get(:@coercion)
+        @access     = options.has_key?(:access) ? options[:access] : name.access
+        @getter     = options.has_key?(:getter) ? options[:getter] : name.getter
+        @setter     = options.has_key?(:setter) ? options[:setter] : name.setter
       else
         @name       = name
         @default    = options[:default]
         @validation = options[:validate]
         @coercion   = options[:coerce]
+        @access     = options[:access]
+        @getter     = options[:getter]
+        @setter     = options[:setter]
       end
 
       @validation = [*@validation] unless @validation.nil?

data/lib/ducktape.rb

@@ -3,7 +3,7 @@ module Ducktape
   # may represent an incompatible implementation with the previous minor version, which should have been
   # represented by a major version number increase.
 
-  VERSION = '0.3.1'
+  VERSION = '0.3.2'
 
   camelize = ->(f){ f.gsub(/(^|_)([^_]+)/) { |_| $2.capitalize } }
 

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: ducktape
 version: !ruby/object:Gem::Version
-  version: 0.3.1
+  version: 0.3.2
   prerelease: 
 platform: ruby
 authors:
@@ -10,7 +10,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-12-24 00:00:00.000000000 Z
+date: 2012-12-27 00:00:00.000000000 Z
 dependencies: []
 description: Truly outrageous bindable attributes
 email: