diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 07:37:17 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 07:37:17 (GMT) |
| commit | e9dc305d78edf450789ae4494b6c44d7a2e0b65a (patch) | |
| tree | 8c7849bbef27f12c25edeeb7a57e5d940b219b92 /tests/imgBmap.test | |
| parent | 4511e01659c99d0bd13e19048e94bf5a543ef00d (diff) | |
| parent | 075429fc2cc7afc986bc3839feacf935c89ccbc7 (diff) | |
| download | tk-e9dc305d78edf450789ae4494b6c44d7a2e0b65a.zip tk-e9dc305d78edf450789ae4494b6c44d7a2e0b65a.tar.gz tk-e9dc305d78edf450789ae4494b6c44d7a2e0b65a.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'tests/imgBmap.test')
| -rw-r--r-- | tests/imgBmap.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/imgBmap.test b/tests/imgBmap.test index 4f36b47..f885c59 100644 --- a/tests/imgBmap.test +++ b/tests/imgBmap.test @@ -503,8 +503,8 @@ test imageBmap-11.2 {ImgBmapDelete procedure} -body { test imageBmap-12.1 {ImgBmapCmdDeletedProc procedure} -body { image create bitmap i2 -file foo.bm -maskfile foo2.bm rename i2 {} - list [lsearch -exact [imageNames] i2] [catch {i2 foo} msg] $msg -} -result {-1 1 {invalid command name "i2"}} + list [expr {i2 in [imageNames]}] [catch {i2 foo} msg] $msg +} -result {0 1 {invalid command name "i2"}} removeFile foo.bm removeFile foo2.bm |