Added a small test program.
diff --git a/Lib/lib-tk/Tkinter.py b/Lib/lib-tk/Tkinter.py
index cc2316e..5cab21d 100644
--- a/Lib/lib-tk/Tkinter.py
+++ b/Lib/lib-tk/Tkinter.py
@@ -1566,6 +1566,25 @@
self['fg'] = self['bg']
self['activebackground'] = self['bg']
+######################################################################
+# Test:
+
+def _test():
+ root = Tk()
+ label = Label(root, text="Proof-of-existence test for Tk")
+ label.pack()
+ test = Button(root, text="Click me!",
+ command=lambda root=root: root.test.config(
+ text="[%s]" % root.test['text']))
+ test.pack()
+ root.test = test
+ quit = Button(root, text="QUIT", command=root.destroy)
+ quit.pack()
+ root.mainloop()
+
+if __name__ == '__main__':
+ _test()
+
# Emacs cruft
# Local Variables:
diff --git a/Lib/tkinter/Tkinter.py b/Lib/tkinter/Tkinter.py
index cc2316e..5cab21d 100755
--- a/Lib/tkinter/Tkinter.py
+++ b/Lib/tkinter/Tkinter.py
@@ -1566,6 +1566,25 @@
self['fg'] = self['bg']
self['activebackground'] = self['bg']
+######################################################################
+# Test:
+
+def _test():
+ root = Tk()
+ label = Label(root, text="Proof-of-existence test for Tk")
+ label.pack()
+ test = Button(root, text="Click me!",
+ command=lambda root=root: root.test.config(
+ text="[%s]" % root.test['text']))
+ test.pack()
+ root.test = test
+ quit = Button(root, text="QUIT", command=root.destroy)
+ quit.pack()
+ root.mainloop()
+
+if __name__ == '__main__':
+ _test()
+
# Emacs cruft
# Local Variables: