diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-09-08 06:23:41 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-09-08 06:23:41 +0000 |
commit | 4350f22000fdc33e3f81d61ab3866ed696b4427a (patch) | |
tree | 636b1c91fc15e67266afadb6e91d3d9413abbb9b /ext/tk/lib/tk/text.rb | |
parent | 11e732660ae65d702fedffb65908d7205e4f051e (diff) |
* ext/tcltklib/tcltklib.c (ip_init): cannot create a IP at level 4
* ext/tk/lib/multi-tk.rb: improve 'exit' operation, security check, and error treatment
* ext/tk/lib/multi-tk.rb: allow a trusted slave IP to create slave IPs.
* ext/tk/lib/tk/listbox.rb: add TkListbox#value, value=, clear, and erase
* ext/tk/lib/tk/text.rb: add TkText#clear and erase
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@6871 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tk/text.rb')
-rw-r--r-- | ext/tk/lib/tk/text.rb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/tk/lib/tk/text.rb b/ext/tk/lib/tk/text.rb index acdc905fe0..c05e3f03ad 100644 --- a/ext/tk/lib/tk/text.rb +++ b/ext/tk/lib/tk/text.rb @@ -120,6 +120,12 @@ class TkText<TkTextWin val end + def clear + tk_send_without_enc('delete', "1.0", 'end') + self + end + alias erase clear + def _addcmd(cmd) @cmdtbl.push cmd end |