diff options
author | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-10-02 06:02:17 +0000 |
---|---|---|
committer | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-10-02 06:02:17 +0000 |
commit | ab6b4786152b663215f05841f7d131d1a7f43db7 (patch) | |
tree | 5e0a40d402ee6e82cefc7a5e564f306569b645a0 /ext/tk/lib/tkafter.rb | |
parent | 8c0cbb735000465ca0e07526efb4489e4fe5e414 (diff) | |
download | ruby-ab6b4786152b663215f05841f7d131d1a7f43db7.tar.gz |
* commit miss; and tcltklib fix too.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2920 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkafter.rb')
-rw-r--r-- | ext/tk/lib/tkafter.rb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ext/tk/lib/tkafter.rb b/ext/tk/lib/tkafter.rb index ec39d9957f..b7c21e7529 100644 --- a/ext/tk/lib/tkafter.rb +++ b/ext/tk/lib/tkafter.rb @@ -64,7 +64,7 @@ class TkAfter def set_next_callback(args) if @running == false || @proc_max == 0 || @do_loop == 0 - Tk_CBTBL[@id] = nil ;# for GC + Tk_CBTBL.delete(@id) ;# for GC @running = false return end @@ -72,7 +72,7 @@ class TkAfter if @do_loop < 0 || (@do_loop -= 1) > 0 @current_pos = 0 else - Tk_CBTBL[@id] = nil ;# for GC + Tk_CBTBL.delete(@id) ;# for GC @running = false return end @@ -272,7 +272,7 @@ class TkAfter @running = false tk_call 'after', 'cancel', @after_id if @after_id @after_id = nil - Tk_CBTBL[@id] = nil ;# for GC + Tk_CBTBL.delete(@id) ;# for GC self end alias stop cancel |