diff options
Diffstat (limited to 'ext/tk/lib/tk')
-rw-r--r-- | ext/tk/lib/tk/canvas.rb | 6 | ||||
-rw-r--r-- | ext/tk/lib/tk/scrollable.rb | 11 | ||||
-rw-r--r-- | ext/tk/lib/tk/txtwin_abst.rb | 2 |
3 files changed, 11 insertions, 8 deletions
diff --git a/ext/tk/lib/tk/canvas.rb b/ext/tk/lib/tk/canvas.rb index 02b4a8cb20..c30fd79bb9 100644 --- a/ext/tk/lib/tk/canvas.rb +++ b/ext/tk/lib/tk/canvas.rb @@ -42,7 +42,7 @@ end class TkCanvas<TkWindow include TkCanvasItemConfig - include Scrollable + include Tk::Scrollable TkCommandNames = ['canvas'.freeze].freeze WidgetClassName = 'Canvas'.freeze @@ -543,8 +543,8 @@ class TkCanvas<TkWindow tk_send_without_enc('scan', 'mark', x, y) self end - def scan_dragto(x, y) - tk_send_without_enc('scan', 'dragto', x, y) + def scan_dragto(x, y, gain=None) + tk_send_without_enc('scan', 'dragto', x, y, gain) self end diff --git a/ext/tk/lib/tk/scrollable.rb b/ext/tk/lib/tk/scrollable.rb index ec27b76467..96959b7a4b 100644 --- a/ext/tk/lib/tk/scrollable.rb +++ b/ext/tk/lib/tk/scrollable.rb @@ -4,7 +4,7 @@ require 'tk' module Tk - module X_Scrollable + module XScrollable def xscrollcommand(cmd=Proc.new) configure_cmd 'xscrollcommand', cmd # Tk.update # avoid scrollbar trouble @@ -38,7 +38,7 @@ module Tk end end - module Y_Scrollable + module YScrollable def yscrollcommand(cmd=Proc.new) configure_cmd 'yscrollcommand', cmd # Tk.update # avoid scrollbar trouble @@ -72,8 +72,11 @@ module Tk end end + X_Scrollable = XScrollable + Y_Scrollable = YScrollable + module Scrollable - include X_Scrollable - include Y_Scrollable + include XScrollable + include YScrollable end end diff --git a/ext/tk/lib/tk/txtwin_abst.rb b/ext/tk/lib/tk/txtwin_abst.rb index 5520360eab..540f806d17 100644 --- a/ext/tk/lib/tk/txtwin_abst.rb +++ b/ext/tk/lib/tk/txtwin_abst.rb @@ -4,7 +4,7 @@ require 'tk' class TkTextWin<TkWindow - TkCommnadNames = [].freeze + TkCommandNames = [].freeze #def create_self # fail RuntimeError, "TkTextWin is an abstract class" #end |