From ec911a5fc41d894d1e06b0a4bf3c870cf7aa9788 Mon Sep 17 00:00:00 2001 From: nagai Date: Mon, 3 Oct 2005 15:34:37 +0000 Subject: * ext/tk/lib/tkextlib/tktable/tktable.rb: border_* instance methods don't call 'border' subcommands. git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@9343 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/tk/lib/tkextlib/SUPPORT_STATUS | 2 +- ext/tk/lib/tkextlib/tktable/tktable.rb | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) (limited to 'ext/tk/lib') diff --git a/ext/tk/lib/tkextlib/SUPPORT_STATUS b/ext/tk/lib/tkextlib/SUPPORT_STATUS index 0a5c332d8..81cffb5ed 100644 --- a/ext/tk/lib/tkextlib/SUPPORT_STATUS +++ b/ext/tk/lib/tkextlib/SUPPORT_STATUS @@ -1,7 +1,7 @@ [ 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 at last. If you want to add other Tcl/Tk extensions to the planed list diff --git a/ext/tk/lib/tkextlib/tktable/tktable.rb b/ext/tk/lib/tkextlib/tktable/tktable.rb index 161f4e454..59328a8f6 100644 --- a/ext/tk/lib/tkextlib/tktable/tktable.rb +++ b/ext/tk/lib/tkextlib/tktable/tktable.rb @@ -360,16 +360,16 @@ class Tk::TkTable end def border_mark(x, y) - simplelist(tk_send('scan', 'mark', x, y)) + simplelist(tk_send('border', 'mark', x, y)) end def border_mark_row(x, y) - tk_send('scan', 'mark', x, y, 'row') + tk_send('border', 'mark', x, y, 'row') end def border_mark_col(x, y) - tk_send('scan', 'mark', x, y, 'col') + tk_send('border', 'mark', x, y, 'col') end def border_dragto(x, y) - tk_send('scan', 'dragto', x, y) + tk_send('border', 'dragto', x, y) end def clear_cache(first=None, last=None) -- cgit