diff options
| author | pspjuth <peter.spjuth@gmail.com> | 2002-07-25 21:35:22 (GMT) |
|---|---|---|
| committer | pspjuth <peter.spjuth@gmail.com> | 2002-07-25 21:35:22 (GMT) |
| commit | 22fb9c3984a951a4a75220e1baddb688801e15ef (patch) | |
| tree | 608ffc6660502cadb5242627b23a9954ae489a14 /tests/winWm.test | |
| parent | c405da7b48b5b98e265a61df3590913ebc571bdd (diff) | |
| download | tk-22fb9c3984a951a4a75220e1baddb688801e15ef.zip tk-22fb9c3984a951a4a75220e1baddb688801e15ef.tar.gz tk-22fb9c3984a951a4a75220e1baddb688801e15ef.tar.bz2 | |
Objectifed wm. [Patch #564521]
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 |