summaryrefslogtreecommitdiffstats
path: root/tests/msgbox.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/msgbox.test')
-rw-r--r--tests/msgbox.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/msgbox.test b/tests/msgbox.test
index 78adb81..b37305c 100644
--- a/tests/msgbox.test
+++ b/tests/msgbox.test
@@ -5,7 +5,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: msgbox.test,v 1.4 2000/04/18 02:18:34 ericm Exp $
+# RCS: @(#) $Id: msgbox.test,v 1.5 2001/08/01 16:21:12 dgp Exp $
#
if {[lsearch [namespace children] ::tcltest] == -1} {
@@ -72,7 +72,7 @@ test msgbox-1.10 {tk_messageBox command} {
list [catch {tk_messageBox -parent foo.bar} msg] $msg
} {1 {bad window path name "foo.bar"}}
-if {[info commands tkMessageBox] == ""} {
+if {[info commands tk::MessageBox] == ""} {
set isNative 1
} else {
set isNative 0