diff options
Diffstat (limited to 'ext/tk/lib/tk/scrollbox.rb')
-rw-r--r-- | ext/tk/lib/tk/scrollbox.rb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/ext/tk/lib/tk/scrollbox.rb b/ext/tk/lib/tk/scrollbox.rb index f0fdece260..5f304d377f 100644 --- a/ext/tk/lib/tk/scrollbox.rb +++ b/ext/tk/lib/tk/scrollbox.rb @@ -14,10 +14,15 @@ class TkScrollbox<TkListbox scroll = TkScrollbar.new(@frame) @path = list.path +=begin list.configure 'yscroll', scroll.path+" set" list.pack 'side'=>'left','fill'=>'both','expand'=>'yes' scroll.configure 'command', list.path+" yview" scroll.pack 'side'=>'right','fill'=>'y' +=end + list.yscrollbar(scroll) + list.pack('side'=>'left','fill'=>'both','expand'=>'yes') + scroll.pack('side'=>'right','fill'=>'y') delegate('DEFAULT', list) delegate('foreground', list) |