Bug [0aaeb9c380]. Fix spurious tcltest output on hyphenated constraints

tcltk · Sep 22, 2023 · fffc411 · fffc411
1 parent ed32508
commit fffc411
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
@@ -2365,6 +2365,7 @@ proc tcltest::Skipped {name constraints} {
 	# make sure that the constraints are satisfied.
 
 	set doTest 0
+        set constraints [string trim $constraints]
 	if {[string match {*[$\[]*} $constraints] != 0} {
 	    # full expression, e.g. {$foo > [info tclversion]}
 	    catch {set doTest [uplevel #0 [list expr $constraints]]}