Added a small test program.

diff --git a/Lib/lib-tk/Tkinter.py b/Lib/lib-tk/Tkinter.py
index cc2316e562245dd5257720245f94c0dc662e18eb..5cab21d6af31b93db0ffba0499d2308a30fd1736 100644 (file)
--- a/Lib/lib-tk/Tkinter.py
+++ b/Lib/lib-tk/Tkinter.py
@@ -1566,6 +1566,25 @@ class Tributton(Button):
                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 cc2316e562245dd5257720245f94c0dc662e18eb..5cab21d6af31b93db0ffba0499d2308a30fd1736 100755 (executable)
--- a/Lib/tkinter/Tkinter.py
+++ b/Lib/tkinter/Tkinter.py
@@ -1566,6 +1566,25 @@ class Tributton(Button):
                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: