diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-10-25 22:36:50 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-10-25 22:36:50 +0000 |
| commit | b6d7415b8f75ccf9fed519c69492998fce389caa (patch) | |
| tree | 9da8397e32160d69e1619a0aa8a26b759b858bb3 | |
| parent | a5f96ec9df5f440247fe31cc11bdd687e190383b (diff) | |
| download | ruby-b6d7415b8f75ccf9fed519c69492998fce389caa.tar.gz ruby-b6d7415b8f75ccf9fed519c69492998fce389caa.tar.xz ruby-b6d7415b8f75ccf9fed519c69492998fce389caa.zip | |
add TkRoot.destroy
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@4842 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
| -rw-r--r-- | ext/tk/lib/tk.rb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb index a71ac7590..9cdd3b918 100644 --- a/ext/tk/lib/tk.rb +++ b/ext/tk/lib/tk.rb @@ -4453,6 +4453,10 @@ class TkRoot<TkWindow def path "." end + + def TkRoot.destroy + TkCore::INTERP._invoke('destroy', '.') + end end class TkToplevel<TkWindow |