glimmer-dsl-tk 0.0.26 → 0.0.27

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 23370b36e8a1902b5115b534e8d9510ff5660d9b5daa9bf31abec321976eb485
-  data.tar.gz: ebb5477ba30c249375d96f81747f250ea45ea14b20bc0420b373c9a36b0d79fc
+  metadata.gz: 73b915eb9db0314df3594942c5c4a1205d3ae63a923f01e4dee9f3ee03c75ac0
+  data.tar.gz: 31f1293d6d56d4966207a00b2aa453775adc51ab86aaf71f4dc40bfa5e0dabda
 SHA512:
-  metadata.gz: 7249831c8104e32a6cab14341757932acb621e8de027ff6b698e6f017361959b27174b8ecd1d9a6ea3aa428a93a4392a57ceee2d7c7f08f4513eddf95129a051
-  data.tar.gz: 7cafb57cb7fc10656d70d101cc32e8e0e18e6636ff34ed4c2056b8f8dbc9ec428205f96643792adaf939c2fc0789974f11be4718e6f443fca74bf4c6aee6c21a
+  metadata.gz: 965f7054d8cad79a9aeed46dd189c8db263d3447b965afccf6a2bc4e5376b95fed6b21cd119e23110ea8c140ae9b4c07cbd0927087dacacb70641bb7afe2d341
+  data.tar.gz: c26996ed08d930161da7cf0814753fcffdba7339be1eea84135f5e3f1fac64abcdf1efc24daf1b23859d197b117f4de62c34a78d678823c3ea68edbf91a1dd11

data/CHANGELOG.md

@@ -1,5 +1,13 @@
 # Change Log
 
+## 0.0.27
+
+- Improve Hello, Text! (toolbar buttons: bold, italic, underline)
+- Set correct `wrap 'word'` attribute for `text` widget in Hello, Text!
+- Default `text` widget to `wrap = 'none'`
+- Default `text` widget to `font = {family: 'Courier New'}`
+- Fix issue with unbolding text in `text` widget when selecting multiple lines with an empty line
+
 ## 0.0.26
 
 - Ensure spinbox data-binding updates on text key changes (without incrementing/decrementing)

data/README.md

@@ -1,4 +1,4 @@
-# [<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.26
+# [<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.27
 ## MRI Ruby Desktop Development GUI Library
 [![Gem Version](https://badge.fury.io/rb/glimmer-dsl-tk.svg)](http://badge.fury.io/rb/glimmer-dsl-tk)
 [![Ruby](https://github.com/AndyObtiva/glimmer-dsl-tk/actions/workflows/ruby.yml/badge.svg)](https://github.com/AndyObtiva/glimmer-dsl-tk/actions/workflows/ruby.yml)
@@ -10,11 +10,9 @@
 
 [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 recently improved by gaining native looking themed 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.).
+[Tcl/Tk](https://www.tcl.tk/) has recently improved by gaining native looking themed 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.). Additionally, [Ruby](https://www.ruby-lang.org/en/) 3.0 Ractor (formerly known as [Guilds](https://olivierlacan.com/posts/concurrency-in-ruby-3-with-guilds/)) supports truly parallel multi-threading, making both [MRI](https://github.com/ruby/ruby) and [Tk](https://www.tcl.tk/) finally viable for support in [Glimmer](https://github.com/AndyObtiva/glimmer) (Ruby Desktop Development GUI Library) as an alternative to [JRuby on SWT](https://github.com/AndyObtiva/glimmer-dsl-swt).
 
-Additionally, [Ruby](https://www.ruby-lang.org/en/) 3.0 Ractor (formerly known as [Guilds](https://olivierlacan.com/posts/concurrency-in-ruby-3-with-guilds/)) supports truly parallel multi-threading, making both [MRI](https://github.com/ruby/ruby) and [Tk](https://www.tcl.tk/) finally viable for support in [Glimmer](https://github.com/AndyObtiva/glimmer) (Ruby Desktop Development GUI Library) as an alternative to [JRuby on SWT](https://github.com/AndyObtiva/glimmer-dsl-swt).
-
-The trade-off is that while [SWT](https://www.eclipse.org/swt/) provides a plethora of high quality reusable widgets for the Enterprise (such as [Nebula](https://www.eclipse.org/nebula/)), [Tk](https://www.tcl.tk/) enables very fast app startup time and a small memory footprint via [MRI Ruby](https://www.ruby-lang.org/en/).
+The trade-off is that while [SWT](https://www.eclipse.org/swt/) provides a plethora of high quality reusable widgets for the Enterprise (such as [Nebula](https://github.com/AndyObtiva/glimmer-cw-nebula)), [Tk](https://www.tcl.tk/) enables very fast app startup time and a small memory footprint via [MRI Ruby](https://www.ruby-lang.org/en/).
 
 [Glimmer DSL for Tk](https://github.com/AndyObtiva/glimmer-dsl-tk) aims to provide a DSL similar to the [Glimmer DSL for SWT](https://github.com/AndyObtiva/glimmer-dsl-swt) to enable more productive desktop development in Ruby with:
 - Declarative DSL syntax that visually maps to the GUI widget hierarchy
@@ -76,11 +74,15 @@ Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems:
     - [Supported Widgets](#supported-widgets)
       - [Common Attributes](#common-attributes)
       - [Common Themed Widget States](#common-themed-widget-states)
+      - [Text Extra API Methods](#text-extra-api-methods)
     - [Smart Defaults and Conventions](#smart-defaults-and-conventions)
       - [Grid Layout](#grid-layout)
-      - [Label/Button Image](#labelbutton-image)
+      - [Image Attribute](#image-attribute)
+      - [Frame Padding](#frame-padding)
       - [Notebook Frame](#notebook-frame)
       - [Icon Photo](#icon-photo)
+      - [Root Background](#root-background)
+      - [Text Defaults](#text-defaults)
   - [The Grid Geometry Manager](#the-grid-geometry-manager)
   - [Data-Binding](#data-binding)
     - [Label Data-Binding](#label-data-binding)
@@ -146,7 +148,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '~> 0.0.26'
+gem 'glimmer-dsl-tk', '~> 0.0.27'
 ```
 
 And, then run:
@@ -317,6 +319,59 @@ keyword(args) | attributes | event bindings & callbacks
 - `invalid?`
 - `hover?`
 
+#### Text Extra API Methods
+
+[Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) automatically provides a `text` attribute for the `text` widget that enables updating its content simply without worrying about whether to manually insert by index, delete, or append.
+
+Also, the `text` widget is enhanced by [Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) to enable simpler manipulation of text options without dealing with [tags](https://tkdocs.com/tutorial/text.html) directly. Simply specify region to mutate and option/value or font_option/value, and [Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) takes care of the rest by automating work of adding/removing [tags](https://tkdocs.com/tutorial/text.html) behind the scenes.
+
+- `add_format(region_start, region_end, option, value)`
+- `remove_format(region_start, region_end, option, value)`
+- `toggle_format(region_start, region_end, option, value)`
+- `add_font_format(region_start, region_end, font_option, value)`
+- `remove_font_format(region_start, region_end, font_option, value)`
+- `toggle_font_format(region_start, region_end, font_option, value)`
+- `add_selection_format(region_start, region_end, option, value)`
+- `remove_selection_format(region_start, region_end, option, value)`
+- `toggle_selection_format(region_start, region_end, option, value)`
+- `add_selection_font_format(region_start, region_end, font_option, value)`
+- `remove_selection_font_format(region_start, region_end, font_option, value)`
+- `toggle_selection_font_format(region_start, region_end, font_option, value)`
+
+Available options:
+
+- `background`
+- `bgstipple`
+- `borderwidth`
+- `elide`
+- `fgstipple`
+- `foreground`
+- `justify`
+- `lmargin1`
+- `lmargin2`
+- `offset`
+- `overstrike`
+- `relief`
+- `rmargin`
+- `spacing1`
+- `spacing2`
+- `spacing3`
+- `tabs`
+- `tabstyle`
+- `underline`
+- `wrap`
+
+Available font options:
+
+- `family` (default: `'Courier New'`)
+- `size` (default: `13`)
+- `weight` (default: `'normal'`) (e.g. `'bold'`)
+- `slant` (default: `'roman'`) (e.g. `'italic`')
+- `underline` (default: `false`)
+- `overstrike` (default: `false`)
+
+Check out the [Hello, Text!](#hello-text) sample for a good demonstration of the `text` widget.
+
 ### Smart Defaults and Conventions
 
 #### Event Bindings
@@ -331,9 +386,13 @@ Also, any widget that is the first in a series of siblings has `column_weight` a
 
 To override that behavior, you may set alternative `grid` keyword args if needed (e.g. `grid sticky: '', column_weight: 0` disables the smart defaults).
 
-#### Label/Button Image
+#### Image Attribute
 
-Label and Button `image` attribute can accept image path directly as an alternative to `TkPhotoImage` object in addition to key values for automatic processing of image (`subsample`, `zoom`, `from`, `to`, `shrink`, `compositingrule`)
+Widget `image` attribute (e.g. `label` `image`) can accept image path directly as an alternative to `TkPhotoImage` object in addition to key values for automatic processing of image (`subsample`, `zoom`, `from`, `to`, `shrink`, `compositingrule`)
+
+#### Frame Padding
+
+Frames have a padding of `15` all around by default to produce more user-friendly graphical user interfaces.
 
 #### Notebook Frame
 
@@ -367,6 +426,12 @@ root {
 
 `root` `background` color attribute is automatically set to `'#ececec'` on the Mac to avoid having a non-native-looking light-colored background.
 
+#### Text Defaults
+
+`text` widget has these defaults:
+- `wrap = 'none'`
+- `font = {family: 'Courier New'}`
+
 ## The Grid Geometry Manager
 
 The Grid Geometry Manager is supported via the `grid` keyword just as per the [Tk documentation](https://tkdocs.com/tutorial/grid.html), except by nesting under the widget it concerns.
@@ -520,24 +585,6 @@ It automatically handles all the Tk plumbing behind the scenes.
 
 More details can be found in [Hello, Spinbox!](#hello-spinbox) sample below.
 
-### Text Data-Binding
-
-Example:
-
-This assumes a `Person` model with a `address` attribute.
-
-```ruby
-  text {
-    text <=> [person, :address]
-  }
-```
-
-That code binds the text content of `text` to the `address` attribute on the `person` model.
-
-It automatically handles all the Tk plumbing behind the scenes (including fine-grained inserts and deletes, abstracting them all away).
-
-More details can be found in [Glimmer Meta-Sample](#samples) below.
-
 ### Checkbutton Data-Binding
 
 Example:
@@ -1636,8 +1683,6 @@ Glimmer app:
 
 ### Hello, Text!
 
-[Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) automatically provides a `text` attribute for the `text` widget that enables updating its content simply without worrying about whether to manually insert by index, delete, or append.
-
 Glimmer code (from [samples/hello/hello_text.rb](samples/hello/hello_text.rb)):
 
 ```ruby
@@ -1674,14 +1719,44 @@ class HelloText
       frame {
         grid row: 0, column: 0
         
+        button {
+          grid row: 0, column: 0, column_weight: 0
+          text 'B'
+          style font: {weight: 'bold'}
+          
+          on('command') do
+            @text.toggle_selection_font_format('weight', 'bold')
+          end
+        }
+        
+        button {
+          grid row: 0, column: 1, column_weight: 0
+          text 'I'
+          style font: {slant: 'italic'}
+          
+          on('command') do
+            @text.toggle_selection_font_format('slant', 'italic')
+          end
+        }
+        
+        button {
+          grid row: 0, column: 2, column_weight: 0
+          text 'U'
+          style font: {underline: true}
+          
+          on('command') do
+            @text.toggle_selection_font_format('underline', true)
+          end
+        }
+        
         combobox {
-          grid row: 0, column: 0, column_weight: 1
+          grid row: 0, column: 4, column_weight: 1
           readonly true
           text <=> [self, :foreground, after_write: ->(value) { @text.add_selection_format('foreground', value == FOREGROUND_PROMPT ? 'black' : value) }]
         }
         
         combobox {
-          grid row: 0, column: 1, column_weight: 1
+          grid row: 0, column: 5, column_weight: 1
           readonly true
           text <=> [self, :background, after_write: ->(value) { @text.add_selection_format('background', value == BACKGROUND_PROMPT ? 'black' : value) }]
         }
@@ -1689,6 +1764,7 @@ class HelloText
       
       @text = text {
         grid row: 1, column: 0, row_weight: 1
+        wrap 'word'
         text <<~MULTI_LINE_STRING
           According to the National Post, a heavy metal-loving high school principal in Canada will be allowed to keep her job, days after a public campaign to oust her made headlines around the globe.
           

data/VERSION

@@ -1 +1 @@
-0.0.26
+0.0.27

data/lib/glimmer/tk/text_proxy.rb

@@ -100,7 +100,7 @@ module Glimmer
         
         tag_names.select do |tag_name|
           @tk.tag_ranges(tag_name).any? do |range|
-            if range.first.to_f <= region_start.to_f && range.last.to_f >= region_end.to_f
+            if text_index_less_than_or_equal_to_other_text_index?(range.first, region_start) && text_index_greater_than_or_equal_to_other_text_index?(range.last, region_end)
               @tk.tag_cget(tag_name, option) == value
             end
           end
@@ -120,7 +120,7 @@ module Glimmer
           @tk.tag_ranges(tag_name).any? do |range|
             if range.first.to_f.between?(region_start.to_f, region_end.to_f) or
                range.last.to_f.between?(region_start.to_f, region_end.to_f) or
-               (range.first.to_f <= region_start.to_f && range.last.to_f >= region_end.to_f)
+               (text_index_less_than_or_equal_to_other_text_index?(range.first, region_start) && text_index_greater_than_or_equal_to_other_text_index?(range.last, region_end))
               @tk.tag_cget(tag_name, option) == value
             end
           end
@@ -141,44 +141,207 @@ module Glimmer
           add_format(region_start, region_end, option, value)
         end
       end
+           
+      # TODO Algorithm for font option formatting
+      # for a region, grab all the latest tags for each subregion as well as the widget font for subregions without a tag
+      # for each part of the region covered by a tag, augment its font with new font option (or remove if that is what is needed)
+      # Once add and remove are implemented, implement toggle
+      # Also, there is a need for a method that checks if a font option value applies to an entire region (to decide which way to toggle with toggle method)
+      def applied_font_format?(region_start, region_end, font_option, value)
+        applied_font_format_tags_and_regions(region_start, region_end).all? do |tag, region_start, region_end|
+          if tag.nil?
+            @tk.font.send(font_option) == value
+          else
+            @tk.tag_cget(tag, 'font').send(font_option) == value
+          end
+        end
+      end
+
+      def applied_font_format_tags_and_regions(region_start, region_end)
+        lines = text.split("\n")
+        tags_and_regions = []
+        all_tag_names = @tk.tag_names - ['sel']
+        (region_start.to_i..region_end.to_i).each do |line_number|
+          start_character_index = 0
+          start_character_index = region_start.to_s.split('.').last.to_i if line_number == region_start.to_i
+          end_character_index = lines[line_number - 1].size
+          end_character_index = region_end.to_s.split('.').last.to_i if line_number == region_end.to_i
+          (start_character_index...end_character_index).each do |character_index|
+            text_index = "#{line_number}.#{character_index}"
+            # TODO reimplement the following using @tk.tag_names without arg since passing an arg seems broken and returns inaccurate results
+            region_tag = all_tag_names.reverse.find do |tag|
+              @tk.tag_cget(tag, 'font') && @tk.tag_ranges(tag).any? do |range_start, range_end|
+                text_index_less_than_or_equal_to_other_text_index?(range_start, text_index) && text_index_greater_than_or_equal_to_other_text_index?(range_end, text_index)
+              end
+            end
+            end_text_index = add_to_text_index(text_index, 1)
+            if tags_and_regions&.last && region_tag == tags_and_regions.last.first
+              tags_and_regions.last[2] = end_text_index
+            else
+              tags_and_regions << [region_tag, text_index, end_text_index]
+            end
+          end
+        end
+        tags_and_regions
+      end
+
+      def add_font_format(region_start, region_end, font_option, value)
+        applied_font_format_tags_and_regions(region_start, region_end).each do |tag, tag_region_start, tag_region_end|
+          if tag
+            bigger_region_tag = @tk.tag_ranges(tag).any? do |range_start, range_end|
+              text_index_less_than_other_text_index?(range_start, tag_region_start) || text_index_greater_than_other_text_index?(range_end, tag_region_end)
+            end
+            if bigger_region_tag
+              @tk.tag_ranges(tag).each do |range_start, range_end|
+                if text_index_less_than_other_text_index?(range_start, tag_region_start) && text_index_less_than_or_equal_to_other_text_index?(range_end, tag_region_end) && text_index_greater_than_or_equal_to_other_text_index?(range_end, tag_region_start)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(range_start, tag_region_start, 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", value)
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                elsif text_index_greater_than_other_text_index?(range_end, tag_region_end) && text_index_greater_than_or_equal_to_other_text_index?(range_start, tag_region_start) && text_index_less_than_or_equal_to_other_text_index?(range_start, tag_region_end)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(tag_region_end, range_end, 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", value)
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                elsif text_index_less_than_other_text_index?(range_start, tag_region_start) && text_index_greater_than_other_text_index?(range_end, tag_region_end)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(range_start, tag_region_start, 'font', font)
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(tag_region_end, range_end, 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", value)
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                end
+              end
+            else
+              current_font = @tk.tag_cget(tag, 'font')
+              current_font.send("#{font_option}=", value)
+            end
+          else
+            add_format(tag_region_start, tag_region_end, 'font', default_font_attributes.merge(font_option => value))
+          end
+        end
+      end
+
+      def remove_font_format(region_start, region_end, font_option, value)
+        applied_font_format_tags_and_regions(region_start, region_end).each do |tag, tag_region_start, tag_region_end|
+          if tag
+            bigger_region_tag = @tk.tag_ranges(tag).any? do |range_start, range_end|
+              text_index_less_than_other_text_index?(range_start, tag_region_start) || text_index_greater_than_other_text_index?(range_end, tag_region_end)
+            end
+            if bigger_region_tag
+              @tk.tag_ranges(tag).each do |range_start, range_end|
+                if text_index_less_than_other_text_index?(range_start, tag_region_start) && text_index_less_than_or_equal_to_other_text_index?(range_end, tag_region_end) && text_index_greater_than_or_equal_to_other_text_index?(range_end, tag_region_start)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(range_start, subtract_from_text_index(tag_region_start, 1), 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", default_for_font_option(font_option))
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                elsif text_index_greater_than_other_text_index?(range_end, tag_region_end) && text_index_greater_than_or_equal_to_other_text_index?(range_start, tag_region_start) && text_index_less_than_or_equal_to_other_text_index?(range_start, tag_region_end)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(add_to_text_index(tag_region_end, 1), range_end, 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", default_for_font_option(font_option))
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                elsif text_index_less_than_other_text_index?(range_start, tag_region_start) && text_index_greater_than_other_text_index?(range_end, tag_region_end)
+                  font = @tk.tag_cget(tag, 'font')
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(range_start, subtract_from_text_index(tag_region_start, 1), 'font', font)
+                  remove_format(range_start, range_end, 'font', font)
+                  add_format(add_to_text_index(tag_region_end, 1), range_end, 'font', font)
+                  font_clone = clone_font(font)
+                  font_clone.send("#{font_option}=", default_for_font_option(font_option))
+                  add_format(tag_region_start, tag_region_end, 'font', font_clone)
+                end
+              end
+            else
+              current_font = @tk.tag_cget(tag, 'font')
+              current_font.send("#{font_option}=", default_for_font_option(font_option))
+            end
+          else
+            add_format(tag_region_start, tag_region_end, 'font', default_font_attributes.merge(font_option => default_for_font_option(font_option)))
+          end
+        end
+      end
+
+      # toggles option/value tag (removes if already applied)
+      def toggle_font_format(region_start, region_end, option, value)
+        if applied_font_format?(region_start, region_end, option, value)
+          remove_font_format(region_start, region_end, option, value)
+        else
+          add_font_format(region_start, region_end, option, value)
+        end
+      end
+      
+      def default_for_font_option(font_option)
+        @tk.font.send(font_option)
+      end
+      
+      def default_font_attributes
+        Hash[@tk.font.actual]
+      end
+      
+      def add_to_text_index(text_index, addition)
+        text_index_parts = text_index.split('.')
+        line = text_index_parts.first
+        char_index = text_index_parts.last
+        char_index = char_index.to_i + addition
+        "#{line}.#{char_index}"
+      end
             
-#       def applied_font_format?(region_start, region_end, option, value)
-#         !applied_font_format_tags(region_start, region_end, option, value).empty?
-#       end
-#
-#       def applied_font_format_tags(region_start, region_end, option, value)
-#         tag_names = @tk.tag_names - ['sel']
-#
-#         tag_names.select do |tag_name|
-#           @tk.tag_ranges(tag_name).any? do |range|
-#             if range.first.to_f <= region_start.to_f && range.last.to_f >= region_end.to_f
-#               @tk.tag_cget(tag_name, option) == value
-#             end
-#           end
-#         end
-#       end
-#
-#       def add_font_format(region_start, region_end, option, value)
-#       end
-#
-#       def remove_font_format(region_start, region_end, option, value)
-#       end
-#
-      ### toggles option/value tag (removes if already applied)
-#       def toggle_font_format(region_start, region_end, option, value)
-#         if applied_font_format?(region_start, region_end, option, value)
-          ### ensure removing from previous font combination (perhaps checking widget font too)
-#           remove_font_format(region_start, region_end, option, value)
-#         else
-          ### ensure adding to previous font combination (perhaps checking widget font too)
-#           add_font_format(region_start, region_end, option, value)
-#         end
-#       end
+      def subtract_from_text_index(text_index, subtraction)
+        add_to_text_index(text_index, -1 * subtraction)
+      end
+      
+      def text_index_less_than_other_text_index?(region1, region2)
+        region1_parts = region1.to_s.split('.')
+        region2_parts = region2.to_s.split('.')
+        return true if region1_parts.first.to_i < region2_parts.first.to_i
+        return false if region1_parts.first.to_i > region2_parts.first.to_i
+        region1_parts.last.to_i < region2_parts.last.to_i
+      end
+            
+      def text_index_less_than_or_equal_to_other_text_index?(region1, region2)
+        region1_parts = region1.to_s.split('.')
+        region2_parts = region2.to_s.split('.')
+        return true if region1_parts.first.to_i < region2_parts.first.to_i
+        return false if region1_parts.first.to_i > region2_parts.first.to_i
+        region1_parts.last.to_i <= region2_parts.last.to_i
+      end
+            
+      def text_index_greater_than_other_text_index?(region1, region2)
+        region1_parts = region1.to_s.split('.')
+        region2_parts = region2.to_s.split('.')
+        return true if region1_parts.first.to_i > region2_parts.first.to_i
+        return false if region1_parts.first.to_i < region2_parts.first.to_i
+        region1_parts.last.to_i > region2_parts.last.to_i
+      end
+            
+      def text_index_greater_than_or_equal_to_other_text_index?(region1, region2)
+        region1_parts = region1.to_s.split('.')
+        region2_parts = region2.to_s.split('.')
+        return true if region1_parts.first.to_i > region2_parts.first.to_i
+        return false if region1_parts.first.to_i < region2_parts.first.to_i
+        region1_parts.last.to_i >= region2_parts.last.to_i
+      end
+      
+      def clone_font(font)
+        ::TkFont.new(Hash[font.actual])
+      end
             
       private
       
       def initialize_defaults
         super
+        self.font = {family: 'Courier New'}
+        self.wrap = 'none'
         self.padx = 5
         self.pady = 5
       end

data/lib/glimmer/tk/widget_proxy.rb

@@ -34,7 +34,9 @@ module Glimmer
           begin
             class_name = "#{keyword.camelcase(:upper)}Proxy".to_sym
             Glimmer::Tk.const_get(class_name)
-          rescue
+          rescue => e
+            Glimmer::Config.logger.debug {"Unable to instantiate custom class name for #{keyword} ... defaulting to Glimmer::Tk::WidgetProxy"}
+            Glimmer::Config.logger.debug {e.full_message}
             Glimmer::Tk::WidgetProxy
           end
         end
@@ -54,7 +56,7 @@ module Glimmer
               tk_widget_class = eval(tk_widget_name)
               break
             rescue RuntimeError, SyntaxError, NameError => e
-              Glimmer::Config.logger.debug e.full_message
+              Glimmer::Config.logger.debug {e.full_message}
             end
           end
           tk_widget_class if tk_widget_class.respond_to?(:new)
@@ -104,6 +106,8 @@ module Glimmer
           @tk.send(attribute_setter(attribute), @tk.send(attribute))
           result = true
         rescue => e
+          Glimmer::Config.logger.debug { "No tk attribute setter for #{attribute}" }
+          Glimmer::Config.logger.debug { e.full_message }
           result = false
         end
         result
@@ -114,7 +118,8 @@ module Glimmer
           # TK Widget currently doesn't support respond_to? properly, so I have to resort to this trick for now
           @tk.send(attribute)
           true
-        rescue
+        rescue => e
+          Glimmer::Config.logger.debug { "No tk attribute getter setter for #{attribute}" }
           false
         end
       end
@@ -125,7 +130,8 @@ module Glimmer
           begin
             @tk.tile_instate(attribute)
             true
-          rescue
+          rescue => e
+            Glimmer::Config.logger.debug { "No tk state for #{attribute}" }
             false
           end
         else
@@ -247,7 +253,7 @@ module Glimmer
       
       def apply_style(options)
         @@style_number = 0 unless defined?(@@style_number)
-        style = "style#{@@style_number}.#{@tk.class.name.split('::').last}"
+        style = "style#{@@style_number += 1}.#{@tk.class.name.split('::').last}"
         ::Tk::Tile::Style.configure(style, options)
         @tk.style = style
       end

data/samples/hello/hello_text.rb

@@ -52,14 +52,44 @@ class HelloText
       frame {
         grid row: 0, column: 0
         
+        button {
+          grid row: 0, column: 0, column_weight: 0
+          text 'B'
+          style font: {weight: 'bold'}
+          
+          on('command') do
+            @text.toggle_selection_font_format('weight', 'bold')
+          end
+        }
+        
+        button {
+          grid row: 0, column: 1, column_weight: 0
+          text 'I'
+          style font: {slant: 'italic'}
+          
+          on('command') do
+            @text.toggle_selection_font_format('slant', 'italic')
+          end
+        }
+        
+        button {
+          grid row: 0, column: 2, column_weight: 0
+          text 'U'
+          style font: {underline: true}
+          
+          on('command') do
+            @text.toggle_selection_font_format('underline', true)
+          end
+        }
+        
         combobox {
-          grid row: 0, column: 0, column_weight: 1
+          grid row: 0, column: 4, column_weight: 1
           readonly true
           text <=> [self, :foreground, after_write: ->(value) { @text.add_selection_format('foreground', value == FOREGROUND_PROMPT ? 'black' : value) }]
         }
         
         combobox {
-          grid row: 0, column: 1, column_weight: 1
+          grid row: 0, column: 5, column_weight: 1
           readonly true
           text <=> [self, :background, after_write: ->(value) { @text.add_selection_format('background', value == BACKGROUND_PROMPT ? 'black' : value) }]
         }
@@ -67,6 +97,7 @@ class HelloText
       
       @text = text {
         grid row: 1, column: 0, row_weight: 1
+        wrap 'word'
         text <<~MULTI_LINE_STRING
           According to the National Post, a heavy metal-loving high school principal in Canada will be allowed to keep her job, days after a public campaign to oust her made headlines around the globe.
           

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-tk
 version: !ruby/object:Gem::Version
-  version: 0.0.26
+  version: 0.0.27
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2021-10-18 00:00:00.000000000 Z
+date: 2021-10-21 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: glimmer
@@ -288,7 +288,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 3.2.22
+rubygems_version: 3.2.29
 signing_key:
 specification_version: 4
 summary: Glimmer DSL for Tk