glimmer-dsl-tk 0.0.3 → 0.0.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 2f57063e358754b89fbd0a57cb118fb9764595a8965eba5884aeb2988ab2d6b1
-  data.tar.gz: f55e3fc96a9388dd218d7c674cdf1585831c44a3f6412741e0e65f53185e2d98
+  metadata.gz: 631bc5fe4586f68987c644c71f33768414c8088601dfbe1cc641d0fc13656729
+  data.tar.gz: abe0f504f6b7fd897af3964e24041331bba475a966c9e75fc22554b86b31cbef
 SHA512:
-  metadata.gz: 272ea64f1a285ebcef28edb4bc2092f1c8ac78bf9ea36e086f1555ba47a454cb09b8c698e06d5ed0aa76abab1fb7946535bae139e9d444663de8185483bba7f4
-  data.tar.gz: e6fa9a29aa2b6a7c096007489a0b0e07d0658f6c79ef836a4cbd4d2fc1300330ef19b97bb6ea62e5d7cac9e00f5a2fca32ee745b167cc8f0d826cacd98a13b1c
+  metadata.gz: c9d211b7f70cbf38c2ad231343a1d5b73c14767d89468a1e99bf418209c03db079edf5ea116ef78c211f4e35795607ea7a9911acf48bffc3913ed53a0adcbc7a
+  data.tar.gz: b7a66a93ad9d478a215c0c3d6348c9e934ce6dc34b04716d8f2d61a908dd62dd2fa4a4bc42fd4804bd53e0a6c5e4413dc2ea6495b3d2c87417e46d435cb82da9

data/CHANGELOG.md

@@ -1,5 +1,19 @@
 # Change Log
 
+## 0.0.4
+
+- `list` custom widget (since listbox is not tile themed yet in Tk)
+- `girb` (Glimmer IRB)
+- Hello, List Single Selection! sample
+- Hello, List Multi Selection! sample
+
+## 0.0.3
+
+- Combobox support
+- Button command event observer support
+- Combobox text data-binding
+- Hello, Combo! sample
+
 ## 0.0.2
 
 - Notebook/frame support

data/README.md

@@ -1,9 +1,11 @@
-# [<img src="https://raw.githubusercontent.com/AndyObtiva/glimmer/master/images/glimmer-logo-hi-res.png" height=85 />](https://github.com/AndyObtiva/glimmer) Glimmer DSL for Tk 0.0.3 (Desktop GUI)
+# [<img src="https://raw.githubusercontent.com/AndyObtiva/glimmer/master/images/glimmer-logo-hi-res.png" height=85 />](https://github.com/AndyObtiva/glimmer) Glimmer DSL for Tk 0.0.4 (Desktop GUI)
 [![Gem Version](https://badge.fury.io/rb/glimmer-dsl-tk.svg)](http://badge.fury.io/rb/glimmer-dsl-tk)
+[![Travis CI](https://travis-ci.com/AndyObtiva/glimmer-dsl-tk.svg?branch=master)](https://travis-ci.com/github/AndyObtiva/glimmer-dsl-tk)
+[![Coverage Status](https://coveralls.io/repos/github/AndyObtiva/glimmer-dsl-tk/badge.svg?branch=master)](https://coveralls.io/github/AndyObtiva/glimmer-dsl-tk?branch=master)
 [![Maintainability](https://api.codeclimate.com/v1/badges/ce2853efdbecf6ebdc73/maintainability)](https://codeclimate.com/github/AndyObtiva/glimmer-dsl-tk/maintainability)
 [![Join the chat at https://gitter.im/AndyObtiva/glimmer](https://badges.gitter.im/AndyObtiva/glimmer.svg)](https://gitter.im/AndyObtiva/glimmer?utm_source=badge&utm_medium=badge&utm_campaign=pr-badge&utm_content=badge)
 
-[Glimmer](https://github.com/AndyObtiva/glimmer) DSL for [Tk](https://www.tcl.tk/) enables desktop development with [Glimmer](https://github.com/AndyObtiva/glimmer).
+[Glimmer](https://github.com/AndyObtiva/glimmer) DSL for [Tk](https://www.tcl.tk/) enables desktop development with [Glimmer](https://github.com/AndyObtiva/glimmer) in [Ruby](https://github.com/ruby/ruby).
 
 [Tcl/Tk](https://www.tcl.tk/) has evolved into a practical desktop GUI toolkit due to gaining true native widgets on Mac, Windows, and Linux in [Tk version 8.5](https://www.tcl.tk/software/tcltk/8.5.html#:~:text=Highlights%20of%20Tk%208.5&text=Font%20rendering%3A%20Now%20uses%20anti,and%20window%20layout%2C%20and%20more.).
 
@@ -42,6 +44,8 @@ Glimmer app:
 
 ![glimmer dsl tk screenshot sample hello world](images/glimmer-dsl-tk-screenshot-sample-hello-world.png)
 
+NOTE: Glimmer DSL for Tk is in alpha mode. Please help make better by contributing, adopting for small or low risk projects, and providing feedback. It is by no means perfect, so the more feedback and issues you report the better.
+
 Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems:
 - [glimmer-dsl-swt](https://github.com/AndyObtiva/glimmer-dsl-swt): Glimmer DSL for SWT (JRuby Desktop GUI)
 - [glimmer-dsl-opal](https://github.com/AndyObtiva/glimmer-dsl-opal): Glimmer DSL for Opal (Web GUI Adapter for Desktop Apps)
@@ -66,8 +70,6 @@ Afterwards, if you open `irb`, you should be able to run `require 'tk'` successf
 
 Run this command to install directly:
 ```
-gem install logging
-gem install super_module
 gem install glimmer-dsl-tk
 ```
 
@@ -75,9 +77,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'logging'
-gem 'super_module'
-gem 'glimmer-dsl-tk', '~> 0.0.3'
+gem 'glimmer-dsl-tk', '~> 0.0.4'
 ```
 
 And, then run:
@@ -85,6 +85,16 @@ And, then run:
 bundle
 ```
 
+## Girb (Glimmer IRB)
+
+You can run the `girb` command (`bin/girb` if you cloned the project locally):
+
+```
+girb
+```
+
+This gives you `irb` with the `glimmer-dsl-tk` gem loaded and the `Glimmer` module mixed into the main object for easy experimentation with GUI.
+
 ## Tk Concepts
 
 Here is a summary taken from the official [Tk Concepts Tutorial](https://tkdocs.com/tutorial/concepts.html)
@@ -153,10 +163,12 @@ root {
 }.open
 ```
 
-### Bidirectional Data-Binding
+## Bidirectional Data-Binding
 
 Glimmer supports bidirectional data-binding via the `bind` keyword, which takes a model and an attribute.
 
+### Combo Data-Binding
+
 Example:
 
 This assumes a `Person` model with a `country` attribute representing their current country and a `country_options` attribute representing available options for the country attribute.
@@ -168,20 +180,64 @@ This assumes a `Person` model with a `country` attribute representing their curr
   }
 ```
 
+It binds the `values` of the `combobox` to the `country_options` property on the `person` model (data-binding attribute + "_options" by convention).
 That binds the `text` selection of the `combobox` to the `country` property on the `person` model.
 
 It automatically handles all the Tk plumbing behind the scenes, such as using `TkVariable` and setting `combobox` `values` from `person.country_options` by convention (attribute_name + "_options").
 
 More details can be found in the [Hello, Combo!](#hello-combo) sample below.
 
-### Command
+### List Single Selection Data-Binding
+
+Tk does not support a native themed listbox, so Glimmer implements its own `list` widget on top of `Tk::Tile::Treeview`. It is set to single selection via selectmode 'browse'.
+
+Example:
+
+This assumes a `Person` model with a `country` attribute representing their current country and a `country_options` attribute representing available options for the country attribute.
+
+```ruby
+  list {
+    selectmode 'browse'       
+    text bind(person, :country)
+  }
+```
+
+It binds the `items` text of the `list` to the `country_options` property on the `person` model (data-binding attribute + "_options" by convention).
+It also binds the `selection` text of the `list` to the `country` property on the `person` model.
+
+It automatically handles all the Tk plumbing behind the scenes.
+
+More details can be found in the [Hello, List Single Selection!](#hello-list-single-selection) sample below.
+
+### List Multi Selection Data-Binding
+
+Tk does not support a native themed listbox, so Glimmer implements its own `list` widget on top of `Tk::Tile::Treeview`. It is set to multi selection by default.
+
+Example:
+
+This assumes a `Person` model with a `provinces` attribute representing their current country and a `provinces_options` attribute representing available options for the provinces attribute.
+
+```ruby
+  list {
+    text bind(person, :provinces)
+  }
+```
+
+It binds the `items` text of the `list` to the `provinces_options` property on the `person` model (data-binding attribute + "_options" by convention)
+That binds the `selection` text of the `list` to the `provinces` property on the `person` model.
+
+It automatically handles all the Tk plumbing behind the scenes.
+
+More details can be found in the [Hello, List Multi Selection!](#hello-list-multi-selection) sample below.
+
+## Command Observer
 
 Buttons can set a `command` option to trigger when the user clicks the button. This may be done with the `command` keyword, passing in a block directly (no need for `proc` as per Tk)
 
 Example:
 
 ```ruby
-  button { |proxy|
+  button {
     text "Reset Selection"
     command {
       person.reset_country
@@ -291,6 +347,71 @@ Glimmer app:
 ![glimmer dsl tk screenshot sample hello combo](images/glimmer-dsl-tk-screenshot-sample-hello-combo.png)
 ![glimmer dsl tk screenshot sample hello combo dropdown](images/glimmer-dsl-tk-screenshot-sample-hello-combo-dropdown.png)
 
+### Hello, List Single Selection!
+
+Glimmer code (from [samples/hello/hello_list_single_selection.rb](samples/hello/hello_list_single_selection.rb)):
+
+```ruby
+# ... more code precedes
+root {      
+  title 'Hello, List Single Selection!'
+  
+  list {
+    selectmode 'browse'
+    selection bind(person, :country)
+  }
+  
+  button {
+    text "Reset Selection To Default Value"
+    
+    command { person.reset_country }
+  }
+}.open
+# ... more code follows
+```
+
+Run (with the [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed):
+
+```
+ruby -r glimmer-dsl-tk -e "require '../samples/hello/hello_list_single_selection.rb'"
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello list single selection](images/glimmer-dsl-tk-screenshot-sample-hello-list-single-selection.png)
+
+### Hello, List Multi Selection!
+
+Glimmer code (from [samples/hello/hello_list_multi_selection.rb](samples/hello/hello_list_multi_selection.rb)):
+
+```ruby
+# ... more code precedes
+root {
+  title 'Hello, List Multi Selection!'
+  
+  list {
+    selection bind(person, :provinces)
+  }
+  
+  button {
+    text "Reset Selection To Defaults"
+    
+    command { person.reset_provinces }
+  }
+}.open
+# ... more code follows
+```
+
+Run (with the [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed):
+
+```
+ruby -r glimmer-dsl-tk -e "require '../samples/hello/hello_list_multi_selection.rb'"
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello list multi selection](images/glimmer-dsl-tk-screenshot-sample-hello-list-multi-selection.png)
+
 ## Help
 
 ### Issues

data/VERSION

@@ -1 +1 @@
-0.0.3
+0.0.4

data/bin/girb

@@ -0,0 +1,10 @@
+#!/usr/bin/env bash
+
+GIRB_RUNNER="$(realpath $(dirname $0))/girb_runner.rb"
+
+irb $@ -r $GIRB_RUNNER
+
+if !(test -f ~/.girb_runner_exit); then
+  rm -rf ~/.girb_runner_exit
+  exec $0
+fi

data/bin/girb_runner.rb

@@ -0,0 +1,26 @@
+require 'puts_debuggerer'
+require 'fileutils'
+require 'etc'
+
+require_relative '../lib/glimmer-dsl-tk'
+
+include Glimmer
+
+GIRB_RUNNER_EXIT_FILE = "#{Etc.getpwuid.dir}/.girb_runner_exit"
+FileUtils.rm_rf GIRB_RUNNER_EXIT_FILE
+
+@exit_method = method(:exit)
+
+@exit_girb_block = lambda do
+  FileUtils.touch GIRB_RUNNER_EXIT_FILE
+end
+
+def self.exit(*args)
+  @exit_girb_block.call
+  @exit_method.call(*args)
+end
+
+def self.quit(*args)
+  @exit_girb_block.call
+  @exit_method.call(*args)
+end

data/lib/glimmer/data_binding/tk/list_selection_binding.rb

@@ -0,0 +1,75 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
+require 'glimmer/data_binding/observable'
+require 'glimmer/data_binding/observer'
+
+module Glimmer
+  module DataBinding
+    module Tk
+      # Tk List widget selection binding
+      class ListSelectionBinding
+        include Glimmer
+        include Observable
+        include Observer
+  
+        attr_reader :widget_proxy
+  
+        PROPERTY_TYPE_UPDATERS = {
+          :string => lambda do |widget_proxy, value| 
+            widget_proxy.selection = value.to_s
+          end,
+          :array => lambda do |widget_proxy, value| 
+            widget_proxy.selection = (value || [])
+          end
+        }
+  
+        PROPERTY_EVALUATORS = {
+          :string => lambda do |selection_array|
+            return nil if selection_array.empty?
+            selection_array.map(&:text)[0]
+          end,
+          :array => lambda do |selection_array|
+            selection_array.map(&:text)
+          end
+        }
+  
+        # Initialize with list widget and property_type
+        # property_type :string represents default list single selection
+        # property_type :array represents list multi selection
+        def initialize(widget_proxy)
+          property_type = widget_proxy.selectmode == 'browse' ? :string : :array
+          @widget_proxy = widget_proxy
+          @property_type = property_type
+        end
+  
+        def call(value)
+          PROPERTY_TYPE_UPDATERS[@property_type].call(@widget_proxy, value) unless evaluate_property == value
+        end
+  
+        def evaluate_property
+          selection_array = @widget_proxy.tk.selection.to_a
+          PROPERTY_EVALUATORS[@property_type].call(selection_array)
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/dsl/tk/data_binding_expression.rb

@@ -17,14 +17,15 @@ module Glimmer
         end
   
         def interpret(parent, keyword, *args, &block)
+          parent.class
           model_binding = args[0]
           widget_binding_parameters = [parent, keyword]
           widget_binding = DataBinding::Tk::WidgetBinding.new(*widget_binding_parameters)
-          widget_binding.call(model_binding.evaluate_property)
           #TODO make this options observer dependent and all similar observers in widget specific data binding handlers
           widget_binding.observe(model_binding)
           # TODO simplify this logic and put it where it belongs
           parent.add_observer(model_binding, keyword) if parent.respond_to?(:add_observer, [model_binding, keyword])
+          widget_binding.call(model_binding.evaluate_property)
         end        
       end
     end

data/lib/glimmer/dsl/tk/dsl.rb

@@ -36,6 +36,7 @@ module Glimmer
       Engine.add_dynamic_expressions(
         Tk,
         %w[
+          list_selection_data_binding
           data_binding
           block_attribute
           attribute

data/lib/glimmer/dsl/tk/list_selection_data_binding_expression.rb

@@ -0,0 +1,60 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
+require 'glimmer/dsl/expression'
+require 'glimmer/data_binding/model_binding'
+require 'glimmer/data_binding/tk/widget_binding'
+require 'glimmer/data_binding/tk/list_selection_binding'
+
+module Glimmer
+  module DSL
+    module Tk
+      class ListSelectionDataBindingExpression < Expression
+        def can_interpret?(parent, keyword, *args, &block)
+          keyword == 'selection' and
+            block.nil? and
+            parent.is_a?(Glimmer::Tk::ListProxy) and
+            args.size == 1 and
+            args[0].is_a?(DataBinding::ModelBinding) and
+            args[0].evaluate_options_property.is_a?(Array)
+        end
+  
+        def interpret(parent, keyword, *args, &block)
+          model_binding = args[0]
+          widget_binding = DataBinding::Tk::WidgetBinding.new(parent, 'items')
+          widget_binding.call(model_binding.evaluate_options_property)
+          model = model_binding.base_model
+          #TODO make this options observer dependent and all similar observers in widget specific data binding interpretrs
+          widget_binding.observe(model, model_binding.options_property_name)
+  
+          list_selection_binding = DataBinding::Tk::ListSelectionBinding.new(parent)
+          list_selection_binding.call(model_binding.evaluate_property)
+          #TODO check if nested data binding works for list widget and other widgets that need custom data binding
+          list_selection_binding.observe(model, model_binding.property_name_expression)
+  
+          parent.tk.bind('<TreeviewSelect>') do
+            model_binding.call(list_selection_binding.evaluate_property)
+          end
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/dsl/tk/widget_expression.rb

@@ -55,3 +55,4 @@ require 'glimmer/tk/widget_proxy'
 require 'glimmer/tk/notebook_proxy'
 require 'glimmer/tk/frame_proxy'
 require 'glimmer/tk/button_proxy'
+require 'glimmer/tk/list_proxy'

data/lib/glimmer/tk/list_proxy.rb

@@ -0,0 +1,60 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
+require 'glimmer/tk/widget_proxy'
+
+module Glimmer
+  module Tk    
+    # Custom list widget implementation
+    class ListProxy < WidgetProxy
+      def initialize(underscored_widget_name, parent_proxy, args)
+        super('treeview', parent_proxy, args)
+        @tk.show = 'tree'
+      end
+      
+      def widget_custom_attribute_mapping
+        @widget_custom_attribute_mapping ||= {
+          ::Tk::Tile::Treeview => {
+            'items' => {
+              getter: {name: 'items', invoker: lambda { |widget, args| tk.children('').map(&:text) }},
+              setter: {name: 'items=', invoker: lambda { |widget, args| 
+                @tk.delete @tk.children('')
+                args.first.each do |child|
+                  @tk.insert('', 'end', :text => child)
+                end          
+              }},
+            },
+            'selection' => {
+              getter: {name: 'selection', invoker: lambda { |widget, args| @tk.selection.map(&:text) }},
+              setter: {name: 'selection=', invoker: lambda { |widget, args| 
+                selection_args = args.first.is_a?(Array) ? args.first : [args.first]
+                selection_items = selection_args.map do |arg|
+                  @tk.children('').detect {|item| item.text == arg}
+                end
+                @tk.selection_set(*selection_items)
+              }},
+            },
+          },
+        }
+      end
+    end
+  end
+end

data/lib/glimmer/tk/widget_proxy.rb

@@ -45,7 +45,28 @@ module Glimmer
           rescue
             Glimmer::Tk::WidgetProxy
           end        
-        end        
+        end
+        
+        # This supports widgets in and out of basic Tk
+        def tk_widget_class_for(underscored_widget_name)
+          tk_widget_class_basename = underscored_widget_name.camelcase(:upper)
+          potential_tk_widget_class_names = [
+            "::Tk::Tile::#{tk_widget_class_basename}", 
+            "::Tk::#{tk_widget_class_basename}", 
+            "::Tk#{tk_widget_class_basename}", 
+            "::Glimmer::Tk::#{tk_widget_class_basename}Proxy", 
+          ]
+          tk_widget_class = nil
+          potential_tk_widget_class_names.each do |tk_widget_name|
+            begin
+              tk_widget_class = eval(tk_widget_name)
+              break
+            rescue RuntimeError, SyntaxError, NameError => e
+              Glimmer::Config.logger.debug e.full_message
+            end            
+          end
+          tk_widget_class
+        end
       end      
       
       # Initializes a new Tk Widget
@@ -56,13 +77,8 @@ module Glimmer
         @args = args
         tk_widget_class = self.class.tk_widget_class_for(underscored_widget_name)
         @tk = tk_widget_class.new(@parent_proxy.tk, *args)
-        begin
-          # a common widget initializer
-          @tk.grid
-        rescue => e
-          # catching error just in case a widget doesn't support it
-          Glimmer::Config.logger.debug e.full_message
-        end
+        # a common widget initializer
+        @tk.grid
         DEFAULT_INITIALIZERS[underscored_widget_name]&.call(@tk)        
         @parent_proxy.post_initialize_child(self)
       end
@@ -81,24 +97,11 @@ module Glimmer
         !!tk_widget_class_for(underscored_widget_name)
       end
 
-      # This supports widgets in and out of basic Tk
-      def self.tk_widget_class_for(underscored_widget_name)
-        tk_widget_name = "::Tk::Tile::#{underscored_widget_name.camelcase(:upper)}"        
-        tk_widget_class = eval(tk_widget_name)
-        tk_widget_class
-      rescue SyntaxError, NameError => e
-        puts e.full_message
-        nil
-      rescue => e
-        puts e.full_message
-        nil      
-      end
-      
-      def tk_widget_has_attribute?(attribute_name)
+      def tk_widget_has_attribute?(attribute)
         result = nil
         begin     
           # TK Widget currently doesn't support respond_to? properly, so I have to resort to this trick for now   
-          @tk.send(attribute_setter(attribute_name), @tk.send(attribute_name))
+          @tk.send(attribute_setter(attribute), @tk.send(attribute))
           result = true
         rescue => e
           result = false
@@ -106,32 +109,36 @@ module Glimmer
         result      
       end
       
-      def has_attribute?(attribute_name, *args)
-        tk_widget_has_attribute?(attribute_name) || respond_to?(attribute_setter(attribute_name), args)
+      def has_attribute?(attribute, *args)
+        (widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute.to_s]) || 
+          tk_widget_has_attribute?(attribute) || 
+          respond_to?(attribute_setter(attribute), args)
       end
 
-      def set_attribute(attribute_name, *args)
-        widget_custom_attribute = widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute_name.to_s]
+      def set_attribute(attribute, *args)
+        widget_custom_attribute = widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute.to_s]
         if widget_custom_attribute
           widget_custom_attribute[:setter][:invoker].call(@tk, args)
-        elsif tk_widget_has_attribute?(attribute_name)
-          @tk.send(attribute_setter(attribute_name), *args) unless @tk.send(attribute_name) == args.first
+        elsif tk_widget_has_attribute?(attribute)
+          @tk.send(attribute_setter(attribute), *args) unless @tk.send(attribute) == args.first
         else
-          send(attribute_setter(attribute_name), args)
+          send(attribute_setter(attribute), args)
         end
       end
 
-      def get_attribute(attribute_name)
-        widget_custom_attribute = widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute_name.to_s]
+      def get_attribute(attribute)
+        widget_custom_attribute = widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute.to_s]
         if widget_custom_attribute
           widget_custom_attribute[:getter][:invoker].call(@tk, args)
+        elsif tk_widget_has_attribute?(attribute)
+          @tk.send(attribute)
         else
-          @tk.send(attribute_name)
+          send(attribute)
         end
-      end      
+      end
 
-      def attribute_setter(attribute_name)
-        "#{attribute_name}="
+      def attribute_setter(attribute)
+        "#{attribute}="
       end
       
       def widget_custom_attribute_mapping
@@ -145,10 +152,10 @@ module Glimmer
         }
       end
       
-      def widget_property_listener_installers
-        @tk_widget_property_listener_installers ||= {
+      def widget_attribute_listener_installers
+        @tk_widget_attribute_listener_installers ||= {
           ::Tk::Tile::TCombobox => {
-            :text => lambda do |observer|
+            'text' => lambda do |observer|
               if observer.is_a?(Glimmer::DataBinding::ModelBinding)
                 model = observer.model
                 options_model_property = observer.property_name + '_options'
@@ -158,13 +165,13 @@ module Glimmer
                 observer.call(@tk.textvariable.value)
               }
             end,
-          }
+          },
         }
       end
       
-      def add_observer(observer, property_name)
-        property_listener_installers = @tk.class.ancestors.map {|ancestor| widget_property_listener_installers[ancestor]}.compact
-        widget_listener_installers = property_listener_installers.map{|installer| installer[property_name.to_s.to_sym]}.compact if !property_listener_installers.empty?
+      def add_observer(observer, attribute)
+        attribute_listener_installers = @tk.class.ancestors.map {|ancestor| widget_attribute_listener_installers[ancestor]}.compact
+        widget_listener_installers = attribute_listener_installers.map{|installer| installer[attribute.to_s]}.compact if !attribute_listener_installers.empty?
         widget_listener_installers.to_a.first&.call(observer)
       end      
 
@@ -173,10 +180,17 @@ module Glimmer
       end
 
       def method_missing(method, *args, &block)
-        tk.send(method, *args, &block)
+        method = method.to_s
+        if args.empty? && block.nil? && widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][method]
+          get_attribute(method)
+        elsif widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][method.sub(/=$/, '')] && method.end_with?('=') && block.nil?
+          set_attribute(method.sub(/=$/, ''), *args)
+        else
+          tk.send(method, *args, &block)
+        end
       rescue => e
         Glimmer::Config.logger.debug {"Neither WidgetProxy nor #{tk.class.name} can handle the method ##{method}"}
-        super
+        super(method.to_sym, *args, &block)
       end
       
       def respond_to?(method, *args, &block)

data/samples/hello/hello_combo.rb

@@ -1,3 +1,24 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
 require 'glimmer-dsl-tk'
 
 class Person 

data/samples/hello/hello_list_multi_selection.rb

@@ -0,0 +1,69 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
+require 'glimmer-dsl-tk'
+
+class Person
+  attr_accessor :provinces, :provinces_options
+
+  def initialize
+    self.provinces_options=[
+      "",
+      "Quebec",
+      "Ontario",
+      "Manitoba",
+      "Saskatchewan",
+      "Alberta",
+      "British Columbia",
+      "Nova Skotia",
+      "Newfoundland"
+    ]
+    self.provinces = ["Quebec", "Manitoba", "Alberta"]
+  end
+
+  def reset_provinces
+    self.provinces = ["Quebec", "Manitoba", "Alberta"]
+  end
+end
+
+class HelloListMultiSelection
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    root {
+      title 'Hello, List Multi Selection!'
+      
+      list {
+        selection bind(person, :provinces)
+      }
+      
+      button {
+        text "Reset Selection To Defaults"
+        
+        command { person.reset_provinces }
+      }
+    }.open
+  end
+end
+
+HelloListMultiSelection.new.launch

data/samples/hello/hello_list_single_selection.rb

@@ -0,0 +1,60 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
+require 'glimmer-dsl-tk'
+
+class Person 
+  attr_accessor :country, :country_options
+
+  def initialize
+    self.country_options=["", "Canada", "US", "Mexico"]
+    self.country = "Canada"
+  end
+
+  def reset_country
+    self.country = "Canada"
+  end
+end
+
+class HelloListSingleSelection
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    root {      
+      title 'Hello, List Single Selection!'
+      
+      list {
+        selectmode 'browse'
+        selection bind(person, :country)
+      }
+      
+      button {
+        text "Reset Selection To Default Value"
+        
+        command { person.reset_country }
+      }
+    }.open
+  end
+end
+
+HelloListSingleSelection.new.launch

data/samples/hello/hello_tab.rb

@@ -1,3 +1,24 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# 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.
+
 require 'glimmer-dsl-tk'
 
 class HelloTab

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-tk
 version: !ruby/object:Gem::Version
-  version: 0.0.3
+  version: 0.0.4
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2020-09-12 00:00:00.000000000 Z
+date: 2020-09-13 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: glimmer
@@ -172,7 +172,8 @@ dependencies:
         version: 0.7.0
 description: Glimmer DSL for Tk (Ruby Desktop GUI)
 email: andy.am@gmail.com
-executables: []
+executables:
+- girb
 extensions: []
 extra_rdoc_files:
 - CHANGELOG.md
@@ -183,21 +184,28 @@ files:
 - LICENSE.txt
 - README.md
 - VERSION
+- bin/girb
+- bin/girb_runner.rb
 - lib/glimmer-dsl-tk.rb
+- lib/glimmer/data_binding/tk/list_selection_binding.rb
 - lib/glimmer/data_binding/tk/widget_binding.rb
 - lib/glimmer/dsl/tk/attribute_expression.rb
 - lib/glimmer/dsl/tk/bind_expression.rb
 - lib/glimmer/dsl/tk/block_attribute_expression.rb
 - lib/glimmer/dsl/tk/data_binding_expression.rb
 - lib/glimmer/dsl/tk/dsl.rb
+- lib/glimmer/dsl/tk/list_selection_data_binding_expression.rb
 - lib/glimmer/dsl/tk/root_expression.rb
 - lib/glimmer/dsl/tk/widget_expression.rb
 - lib/glimmer/tk/button_proxy.rb
 - lib/glimmer/tk/frame_proxy.rb
+- lib/glimmer/tk/list_proxy.rb
 - lib/glimmer/tk/notebook_proxy.rb
 - lib/glimmer/tk/root_proxy.rb
 - lib/glimmer/tk/widget_proxy.rb
 - samples/hello/hello_combo.rb
+- samples/hello/hello_list_multi_selection.rb
+- samples/hello/hello_list_single_selection.rb
 - samples/hello/hello_tab.rb
 - samples/hello/hello_world.rb
 homepage: http://github.com/AndyObtiva/glimmer-dsl-tk