Merge of TkAqua Cocoa portmacosx-cocoa-merge

FossilOrigin-Name: 05bd0a2cb86bb730d85069b3282e569b6c23d911

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 {