diff options
| author | nijtmans <nijtmans> | 2008-12-12 00:09:37 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-12-12 00:09:37 (GMT) |
| commit | 3f909f2ee775076c14b45580c9547c369524ac42 (patch) | |
| tree | e59ddae166470723e42e90450559f77303457f15 /tests/canvas.test | |
| parent | b7903758175d813d8c358619a9a2abfc62bff168 (diff) | |
| download | tk-3f909f2ee775076c14b45580c9547c369524ac42.zip tk-3f909f2ee775076c14b45580c9547c369524ac42.tar.gz tk-3f909f2ee775076c14b45580c9547c369524ac42.tar.bz2 | |
Make error message from Tk_GetRelief the
same as for Tk_GetReliefFromObj
Adapt test cases for changed error message
Diffstat (limited to 'tests/canvas.test')
| -rw-r--r-- | tests/canvas.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/canvas.test b/tests/canvas.test index 2261a2c..3128fa9 100644 --- a/tests/canvas.test +++ b/tests/canvas.test @@ -7,7 +7,7 @@ # Copyright (c) 2008 Donal K. Fellows # All rights reserved. # -# RCS: @(#) $Id: canvas.test,v 1.27 2008/11/28 00:10:25 ferrieux Exp $ +# RCS: @(#) $Id: canvas.test,v 1.28 2008/12/12 00:09:38 nijtmans Exp $ package require tcltest 2.1 eval tcltest::configure $argv @@ -139,7 +139,7 @@ test canvas-1.33 {configuration options: good value for "relief"} -body { } -result {groove} test canvas-1.34 {configuration options: bad value for "relief"} -body { .c configure -relief 1.5 -} -returnCodes error -result {bad relief type "1.5": must be flat, groove, raised, ridge, solid, or sunken} +} -returnCodes error -result {bad relief "1.5": must be flat, groove, raised, ridge, solid, or sunken} test canvas-1.35 {configuration options: good value for "selectbackground"} -body { .c configure -selectbackground #110022 .c cget -selectbackground |