summaryrefslogtreecommitdiffstats
path: root/tests/dialog.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/dialog.test')
-rw-r--r--tests/dialog.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/dialog.test b/tests/dialog.test
index bd8c944..82ee799 100644
--- a/tests/dialog.test
+++ b/tests/dialog.test
@@ -1,7 +1,7 @@
# This file is a Tcl script to test out Tk's "tk_dialog" command.
# It is organized in the standard fashion for Tcl tests.
#
-# RCS: @(#) $Id: dialog.test,v 1.6 2008/08/03 15:28:53 aniap Exp $
+# RCS: @(#) $Id: dialog.test,v 1.7 2009/06/29 14:35:01 das Exp $
#
package require tcltest 2.2
@@ -16,10 +16,10 @@ test dialog-1.2 {tk_dialog command} -body {
tk_dialog foo foo foo foo foo
} -returnCodes error -result {bad window path name "foo"}
test dialog-1.3 {tk_dialog command} -body {
- tk_dialog .d foo foo foo foo
+ tk_dialog .d foo foo fooBitmap foo
} -cleanup {
destroy .d
-} -returnCodes error -result {bitmap "foo" not defined}
+} -returnCodes error -result {bitmap "fooBitmap" not defined}
test dialog-2.1 {tk_dialog operation} -setup {