diff options
author | vincentdarley <vincentdarley> | 2006-04-18 22:33:03 (GMT) |
---|---|---|
committer | vincentdarley <vincentdarley> | 2006-04-18 22:33:03 (GMT) |
commit | 0cbfc6064d65ab72fd5b06021b23ea5ae4faa28d (patch) | |
tree | 070d3eb8fd0a8343b716b4543d49687990379852 /tests/wm.test | |
parent | ddd87340e5617fbc7c41879c3ea844a8e53dfcb8 (diff) | |
download | tk-0cbfc6064d65ab72fd5b06021b23ea5ae4faa28d.zip tk-0cbfc6064d65ab72fd5b06021b23ea5ae4faa28d.tar.gz tk-0cbfc6064d65ab72fd5b06021b23ea5ae4faa28d.tar.bz2 |
fix tests for TkAqua
Diffstat (limited to 'tests/wm.test')
-rw-r--r-- | tests/wm.test | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/wm.test b/tests/wm.test index 99e6b76..28afbd6 100644 --- a/tests/wm.test +++ b/tests/wm.test @@ -7,7 +7,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: wm.test,v 1.35 2006/04/05 20:54:27 hobbs Exp $ +# RCS: @(#) $Id: wm.test,v 1.36 2006/04/18 22:33:03 vincentdarley Exp $ # This file tests window manager interactions that work across # platforms. Window manager tests that only work on a specific @@ -127,9 +127,12 @@ test wm-attributes-1.2.3 {usage} win { # not critical. list [catch {wm attributes . -to} err] $err } {1 {wrong # args: should be "wm attributes window ?-alpha ?double?? ?-disabled ?bool?? ?-fullscreen ?bool?? ?-toolwindow ?bool?? ?-topmost ?bool??"}} -test wm-attributes-1.2.4 {usage} unix { +test wm-attributes-1.2.4 {usage} {unix notAqua} { list [catch {wm attributes . _} err] $err } {1 {bad attribute "_": must be -alpha, -topmost, -zoomed, or -fullscreen}} +test wm-attributes-1.2.5 {usage} aqua { + list [catch {wm attributes . _} err] $err +} {1 {bad attribute "_": must be -alpha, -modified, -notify, or -titlepath}} ### wm client ### |