commit a6c67b56b238819215886dc2ead14787a44928ae
author Thomas Wouters <thomas@python.org> Mon Apr 24 11:37:13 2006 +0000
committer Thomas Wouters <thomas@python.org> Mon Apr 24 11:37:13 2006 +0000
tree 88ef234acf861ca2686b1d2d49dfab323b6d9642
parent 03f76cfbf39f6067cce9a26fe3512609a411ce22

Stop test_tcl's testLoadTk from leaking the Tk commands 'loadtk' registers.

Lib/test/test_tcl.py

diff --git a/Lib/test/test_tcl.py b/Lib/test/test_tcl.py
index 2eeabc1..e3fbf98 100644
--- a/Lib/test/test_tcl.py
+++ b/Lib/test/test_tcl.py
@@ -124,6 +124,7 @@
         self.assertRaises(TclError,tcl.winfo_geometry)
         tcl.loadtk()
         self.assertEqual('1x1+0+0', tcl.winfo_geometry())
+        tcl.destroy()
 
     def testLoadTkFailure(self):
         import os