diff options
author | patthoyts <patthoyts@noemail.net> | 2008-07-26 13:32:41 (GMT) |
---|---|---|
committer | patthoyts <patthoyts@noemail.net> | 2008-07-26 13:32:41 (GMT) |
commit | 3c17f6102c0a056118d226706866f68c07aa55ce (patch) | |
tree | 9aff082d62c96d9ee8b973adf3a7795b4c0cb84f /tests/listbox.test | |
parent | c1545f6f580988b5fe5464510cd214820cec9342 (diff) | |
download | tk-3c17f6102c0a056118d226706866f68c07aa55ce.zip tk-3c17f6102c0a056118d226706866f68c07aa55ce.tar.gz tk-3c17f6102c0a056118d226706866f68c07aa55ce.tar.bz2 |
Conform to testing policy and added a nonwin contraint. [Bug 2024753]
FossilOrigin-Name: f12041903a9db85b00c46f54d573d31d197ca934
Diffstat (limited to 'tests/listbox.test')
-rw-r--r-- | tests/listbox.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/listbox.test b/tests/listbox.test index 92c4fda..a6ba719 100644 --- a/tests/listbox.test +++ b/tests/listbox.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: listbox.test,v 1.30 2008/07/23 23:24:25 nijtmans Exp $ +# RCS: @(#) $Id: listbox.test,v 1.31 2008/07/26 13:32:44 patthoyts Exp $ package require tcltest 2.1 eval tcltest::configure $argv @@ -2131,12 +2131,12 @@ test listbox-28.1 {listbox -activestyle} { listbox .l -activ non .l cget -activestyle } none -test listbox-28.2 {listbox -activestyle} {!win} { +test listbox-28.2-nonwin {listbox -activestyle} {nonwin} { destroy .l listbox .l .l cget -activestyle } dotbox -test listbox-28.2 {listbox -activestyle} {win} { +test listbox-28.2-win {listbox -activestyle} {win} { destroy .l listbox .l .l cget -activestyle |