Patch #749191: Delete commands in after_cancel.

diff --git a/Lib/lib-tk/Tkinter.py b/Lib/lib-tk/Tkinter.py
index 50b259acc2609b6bdd6c793423502a4f0b63a433..27a4c6fd6846bae33a247246fb54b70f91ce5fd6 100644 (file)
--- a/Lib/lib-tk/Tkinter.py
+++ b/Lib/lib-tk/Tkinter.py
@@ -454,6 +454,12 @@ class Misc:
 
         Identifier returned by after or after_idle must be
         given as first parameter."""
+        try:
+            (script, type) = self.tk.splitlist(
+                self.tk.call('after', 'info', id))
+            self.deletecommand(script)
+        except TclError:
+            pass
         self.tk.call('after', 'cancel', id)
     def bell(self, displayof=0):
         """Ring a display's bell."""