diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-07-30 07:15:00 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-07-30 07:15:00 +0000 |
commit | 4e0bb56f210c245e5208ae4ca12e8597b1ff64af (patch) | |
tree | d933554bf3086ff89f359a5489a7b5aea61b304f /ext/tk/lib/tkentry.rb | |
parent | 029e9449ce7fa4710eac7a66e605afb3dc8a99ce (diff) |
* bug fix
* fix lack of methods for TkEntry
* fix reference of uninitialized variables
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4231 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkentry.rb')
-rw-r--r-- | ext/tk/lib/tkentry.rb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ext/tk/lib/tkentry.rb b/ext/tk/lib/tkentry.rb index 62b6535ef3..ccfb7928ac 100644 --- a/ext/tk/lib/tkentry.rb +++ b/ext/tk/lib/tkentry.rb @@ -140,6 +140,9 @@ class TkEntry<TkLabel self end + def bbox(index) + list(tk_send('bbox', index)) + end def cursor number(tk_send('index', 'insert')) end @@ -154,6 +157,10 @@ class TkEntry<TkLabel tk_send 'insert', pos, text self end + def delete(first, last=None) + tk_send 'insert', first, last + self + end def mark(pos) tk_send 'scan', 'mark', pos self |