From 226a13396d2297d895bd3ec41c6c61ceb3c8927c Mon Sep 17 00:00:00 2001
From: oehhar <harald.oehlmann@elmicron.de>
Date: Mon, 14 Sep 2020 06:47:51 +0000
Subject: image photo svg: add a test for an image without any of  "width",
 "height" and "viewbox". tksvg 0.3 failes here.

---
 tests/imgSVGnano.test | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

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
-- 
cgit v0.12