diff options
| -rw-r--r-- | tests/dialog.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/dialog.test b/tests/dialog.test index f47296e..538461b 100644 --- a/tests/dialog.test +++ b/tests/dialog.test @@ -12,10 +12,10 @@ test dialog-1.2 {tk_dialog command} { list [catch {tk_dialog foo foo foo foo foo} msg] $msg } {1 {bad window path name "foo"}} test dialog-1.3 {tk_dialog command} { - set res [list [catch {tk_dialog .d foo foo foo foo} msg] $msg] + set res [list [catch {tk_dialog .d foo foo fooBitmap foo} msg] $msg] destroy .d set res -} {1 {bitmap "foo" not defined}} +} {1 {bitmap "fooBitmap" not defined}} proc PressButton {btn} { if {![winfo ismapped $btn]} { |