Print Tk patchlevel in test_tcl in verbose mode (issue19654).

diff --git a/Lib/test/test_tcl.py b/Lib/test/test_tcl.py
index 0ccede1a7e875c417ac2dd6f431303855c0cdab8..a44a0a16f92684bdcc0ee1c4d937d05a061d31ce 100644 (file)
--- a/Lib/test/test_tcl.py
+++ b/Lib/test/test_tcl.py
@@ -282,6 +282,12 @@ class BigmemTclTest(unittest.TestCase):
         self.assertRaises(OverflowError, self.interp.call, 'set', '_', value)
 
 
+def setUpModule():
+    if test_support.verbose:
+        tcl = Tcl()
+        print 'patchlevel =', tcl.call('info', 'patchlevel')
+
+
 def test_main():
     test_support.run_unittest(TclTest, TkinterTest, BigmemTclTest)