diff options
author | pspjuth <pspjuth@noemail.net> | 2002-07-25 21:35:21 (GMT) |
---|---|---|
committer | pspjuth <pspjuth@noemail.net> | 2002-07-25 21:35:21 (GMT) |
commit | 64f246fe079bc6d9937f11e75522595429e514a3 (patch) | |
tree | 608ffc6660502cadb5242627b23a9954ae489a14 /tests/winWm.test | |
parent | a4adcd305339c4caa9aadb7b2dee4b88a9599bf6 (diff) | |
download | tk-64f246fe079bc6d9937f11e75522595429e514a3.zip tk-64f246fe079bc6d9937f11e75522595429e514a3.tar.gz tk-64f246fe079bc6d9937f11e75522595429e514a3.tar.bz2 |
Objectifed wm. [Patch #564521]
FossilOrigin-Name: 92401d20cc4325169eeb6ae277fea3cd22014fb3
Diffstat (limited to 'tests/winWm.test')
-rw-r--r-- | tests/winWm.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winWm.test b/tests/winWm.test index 7f211bf..7bf9810 100644 --- a/tests/winWm.test +++ b/tests/winWm.test @@ -9,7 +9,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: winWm.test,v 1.8 2002/07/13 20:28:36 dgp Exp $ +# RCS: @(#) $Id: winWm.test,v 1.9 2002/07/25 21:35:23 pspjuth Exp $ package require tcltest 2.1 namespace import -force tcltest::configure @@ -243,7 +243,7 @@ test winWm-6.3 {wm attributes} {pcOnly} { destroy .t toplevel .t list [catch {wm attributes .t -foo} msg] $msg -} {1 {wrong # arguments: must be "wm attributes window ?-disabled ?bool?? ?-toolwindow ?bool?? ?-topmost ?bool??"}} +} {1 {wrong # args: should be "wm attributes window ?-disabled ?bool?? ?-toolwindow ?bool?? ?-topmost ?bool??"}} destroy .t |