* ext/tk/lib/tkextlib/tktable/tktable.rb: border_* instance methods

don't call 'border' subcommands.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9343 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2005-10-03 15:34:37 +00:00
parent 1110e7123c
commit 5369103f87
3 changed files with 10 additions and 5 deletions

View File

@ -1,3 +1,8 @@
2005-10-04 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/tkextlib/tktable/tktable.rb: border_* instance methods
don't call 'border' subcommands.
2005-08-10 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> 2005-08-10 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/tkextlib/blt/component.rb: didn't check * ext/tk/lib/tkextlib/blt/component.rb: didn't check

View File

@ -1,7 +1,7 @@
[ current support status of Tcl/Tk extensions ] [ current support status of Tcl/Tk extensions ]
*******<<< RELEASE_DATE of the libraries : 2005/08/10 >>>******* *******<<< RELEASE_DATE of the libraries : 2005/10/04 >>>*******
The following list shows *CURRENT* status when this file was modifyed The following list shows *CURRENT* status when this file was modifyed
at last. If you want to add other Tcl/Tk extensions to the planed list at last. If you want to add other Tcl/Tk extensions to the planed list

View File

@ -360,16 +360,16 @@ class Tk::TkTable
end end
def border_mark(x, y) def border_mark(x, y)
simplelist(tk_send('scan', 'mark', x, y)) simplelist(tk_send('border', 'mark', x, y))
end end
def border_mark_row(x, y) def border_mark_row(x, y)
tk_send('scan', 'mark', x, y, 'row') tk_send('border', 'mark', x, y, 'row')
end end
def border_mark_col(x, y) def border_mark_col(x, y)
tk_send('scan', 'mark', x, y, 'col') tk_send('border', 'mark', x, y, 'col')
end end
def border_dragto(x, y) def border_dragto(x, y)
tk_send('scan', 'dragto', x, y) tk_send('border', 'dragto', x, y)
end end
def clear_cache(first=None, last=None) def clear_cache(first=None, last=None)