summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authoroehhar <harald.oehlmann@elmicron.de>2020-09-14 06:47:51 (GMT)
committeroehhar <harald.oehlmann@elmicron.de>2020-09-14 06:47:51 (GMT)
commit226a13396d2297d895bd3ec41c6c61ceb3c8927c (patch)
tree86d922a8f836027d4c66709e07f0b65a29f258ca
parente7129a671912a8bd718361d9864c5c71ec252fc2 (diff)
downloadtk-226a13396d2297d895bd3ec41c6c61ceb3c8927c.zip
tk-226a13396d2297d895bd3ec41c6c61ceb3c8927c.tar.gz
tk-226a13396d2297d895bd3ec41c6c61ceb3c8927c.tar.bz2
image photo svg: add a test for an image without any of "width", "height" and "viewbox". tksvg 0.3 failes here.
-rw-r--r--tests/imgSVGnano.test15
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/imgSVGnano.test b/tests/imgSVGnano.test
index 44b4e72..e1993d8 100644
--- a/tests/imgSVGnano.test
+++ b/tests/imgSVGnano.test
@@ -207,6 +207,21 @@ test imgSVGnano-4.2 {error on file not accessible on reread due to configure} -s
tcltest::removeFile tmpplus.svg
} -returnCodes error -match glob -result {couldn't open "*/tmpplus.svg": no such file or directory}
+# Special images
+test imgSVGnano-3.10 {image without any of "width", "height" and "viewbox"} -body {
+ image create photo foo -data\
+ {<?xml version="1.0"?><!DOCTYPE svg PUBLIC\
+ "-//W3C//DTD SVG 1.0//EN\"\
+ "http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd">\
+ <svg xmlns="http://www.w3.org/2000/svg">\
+ <g style="fill-opacity:0.7;">\
+ <circle cx="6.5cm" cy="2cm" r="100" style="fill:green;\
+ stroke:black; stroke-width:0.1cm" transform="translate(-70,150)"/>\
+ </g></svg>}
+} -cleanup {
+ rename foo ""
+} -result {foo}
+
};# end of namespace svgnano
namespace delete svgnano