diff options
author | fvogel <fvogelnew1@free.fr> | 2016-08-29 15:28:20 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-08-29 15:28:20 (GMT) |
commit | 992eb3df2d03dec6291784e8dca7e6d85b279c7a (patch) | |
tree | c885db53fd7bd38e3971e2b93242b2e798961ee9 /tests/bitmap.test | |
parent | 1052e56fe96f3ece407a6374714af0302c9a5e3c (diff) | |
parent | 76052445ac39afd2c455431d80335dd464ed755e (diff) | |
download | tk-tip_449.zip tk-tip_449.tar.gz tk-tip_449.tar.bz2 |
Rebased to trunk since TIP #449 was accepted for merging to trunk only, not to core-8-6-branchtip_449
Diffstat (limited to 'tests/bitmap.test')
-rw-r--r-- | tests/bitmap.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/bitmap.test b/tests/bitmap.test index 6e2573f..bd9c47f 100644 --- a/tests/bitmap.test +++ b/tests/bitmap.test @@ -15,7 +15,7 @@ test bitmap-1.1 {Tk_AllocBitmapFromObj - converting internal reps} -constraints testbitmap } -body { set x gray25 - lindex $x 0 + lindex $x 0 button .b -bitmap $x lindex $x 0 testbitmap gray25 @@ -54,12 +54,12 @@ test bitmap-1.3 {Tk_AllocBitmapFromObj - reuse existing bitmap} -constraints { test bitmap-2.1 {Tk_GetBitmap procedure} -body { button .b1 -bitmap bad_name } -cleanup { - destroy .b1 + destroy .b1 } -returnCodes error -result {bitmap "bad_name" not defined} test bitmap-2.2 {Tk_GetBitmap procedure} -body { button .b1 -bitmap @xyzzy } -cleanup { - destroy .b1 + destroy .b1 } -returnCodes error -result {error reading bitmap file "xyzzy"} test bitmap-3.1 {Tk_FreeBitmapFromObj - reference counts} -constraints { |