diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-10-05 20:03:00 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-10-05 20:03:00 (GMT) |
| commit | 3ea9ef64264f0454517511a02a160ec7ec603229 (patch) | |
| tree | ae7a4a83469cd6025a6163b12ce27fe010746f29 /tests | |
| parent | 6f8d8caf039e1561659d4df6766d9b56428ccc94 (diff) | |
| download | tk-3ea9ef64264f0454517511a02a160ec7ec603229.zip tk-3ea9ef64264f0454517511a02a160ec7ec603229.tar.gz tk-3ea9ef64264f0454517511a02a160ec7ec603229.tar.bz2 | |
3574877 stop hang of test dialog-1.3 on Aqua builds.
Diffstat (limited to 'tests')
| -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]} { |