From: Serhiy Storchaka <storchaka@gmail.com>
Date: Wed, 20 Nov 2013 15:44:38 +0000 (+0200)
Subject: Print Tk patchlevel in test_tcl in verbose mode (issue19654).
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=78ecaba4820061f1c9bef70a348c34d354c27824;p=python

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 0ccede1a7e..a44a0a16f9 100644
--- 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)