summaryrefslogtreecommitdiffstats
path: root/tests/macMenu.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2001-03-28 17:27:10 (GMT)
committerdgp <dgp@users.sourceforge.net>2001-03-28 17:27:10 (GMT)
commite28df79982c4950e785d46366ad0a02e5393687e (patch)
tree763662e821b332038a65e4fbd4d588755b4244a1 /tests/macMenu.test
parent6e0cc36e78b8e405dea239f63fba7ee1168bcc40 (diff)
downloadtk-e28df79982c4950e785d46366ad0a02e5393687e.zip
tk-e28df79982c4950e785d46366ad0a02e5393687e.tar.gz
tk-e28df79982c4950e785d46366ad0a02e5393687e.tar.bz2
Replaced all [load {} tk] in Tk test suite with [load {} Tk].
[Bug 220940, Patch 411952]
Diffstat (limited to 'tests/macMenu.test')
-rw-r--r--tests/macMenu.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/macMenu.test b/tests/macMenu.test
index b76b7e6..808e46d 100644
--- a/tests/macMenu.test
+++ b/tests/macMenu.test
@@ -7,7 +7,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: macMenu.test,v 1.3 1999/04/16 01:51:39 stanton Exp $
+# RCS: @(#) $Id: macMenu.test,v 1.4 2001/03/28 17:27:10 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
source [file join [pwd] [file dirname [info script]] defs.tcl]
@@ -852,7 +852,7 @@ test macMenu-21.3 {TkpSetMainMenubar - different interps} {
catch {destroy .m1}
catch {interp delete testinterp}
interp create testinterp
- load {} tk testinterp
+ load {} Tk testinterp
menu .m1
. configure -menu .m1
raise .