summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2019-06-10 11:53:27 (GMT)
committerfvogel <fvogelnew1@free.fr>2019-06-10 11:53:27 (GMT)
commit5e6d237cf90c41cd630dd23727ca47ef9e18e62c (patch)
treeb8a5d68e00c65dac0e29a44e64708a122502d23b /tests
parentb77cb993f609086a6764307b39099bfdc9920945 (diff)
downloadtk-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.test10
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