diff options
author | fvogel <fvogelnew1@free.fr> | 2019-06-10 11:53:27 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2019-06-10 11:53:27 (GMT) |
commit | 5e6d237cf90c41cd630dd23727ca47ef9e18e62c (patch) | |
tree | b8a5d68e00c65dac0e29a44e64708a122502d23b /tests | |
parent | b77cb993f609086a6764307b39099bfdc9920945 (diff) | |
download | tk-5e6d237cf90c41cd630dd23727ca47ef9e18e62c.zip tk-5e6d237cf90c41cd630dd23727ca47ef9e18e62c.tar.gz tk-5e6d237cf90c41cd630dd23727ca47ef9e18e62c.tar.bz2 |
Minor changes in the new tests
Diffstat (limited to 'tests')
-rw-r--r-- | tests/imgSVGnano.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/imgSVGnano.test b/tests/imgSVGnano.test index 7b39f3e..a3bdcbf 100644 --- a/tests/imgSVGnano.test +++ b/tests/imgSVGnano.test @@ -102,15 +102,15 @@ test imgSVGnano-3.4 {zero parameter to -scaletowidth} -body { -data $data(plus) } -returnCodes error -result {-scaletowidth value must be positive} -test imgSVGnano-3.5 {zero parameter to -scaletowidth} -body { +test imgSVGnano-3.5 {zero parameter to -scaletoheight} -body { image create photo foo -format "svg -scaletoheight 0"\ -data $data(plus) } -returnCodes error -result {-scaletoheight value must be positive} test imgSVGnano-3.6 {no number parameter to -scaletoheight} -body { - image create photo foo -format "svg -scale 1 -scaletoheight invalid"\ + image create photo foo -format "svg -scaletoheight invalid"\ -data $data(plus) -} -returnCodes error -result {only one of -scale, -scaletoheight, -scaletowidth may be given} +} -returnCodes error -result {expected integer but got "invalid"} test imgSVGnano-3.7 {Option -scaletowidth} -body { image create photo foo -format "svg -scaletowidth 20"\ @@ -131,10 +131,10 @@ test imgSVGnano-3.8 {Option -scaletoheight} -body { test imgSVGnano-3.9 {Very small scale gives 1x1 image} -body { image create photo foo -format "svg -scale 0.000001"\ -data $data(plus) - image height foo + list [image width foo] [image height foo] } -cleanup { rename foo "" -} -result {1} +} -result {1 1} };# end of namespace svgnano |