summaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2024-02-09 11:44:16 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2024-02-09 16:39:40 -0800
commitea23868ae46aa7677c9e0d74d892cd8dea628b1f (patch)
tree765e5b058d8f161e443d97364d083d508da94c1e /src/Text
parent9ccd40f1142e08dd06629b156685ff5d42bf9e2d (diff)
Fix size of duplicated SVGs with `--embed-resources`.
Closes #9439.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/SelfContained.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/SelfContained.hs b/src/Text/Pandoc/SelfContained.hs
index 7a39edc22..54d49127a 100644
--- a/src/Text/Pandoc/SelfContained.hs
+++ b/src/Text/Pandoc/SelfContained.hs
@@ -160,9 +160,7 @@ convertTags (t@(TagOpen tagname as):ts)
case M.lookup hash svgmap of
Just (svgid, svgattrs) -> do
let attrs' = [(k,v) | (k,v) <- combineSvgAttrs svgattrs attrs
- , k /= "id"
- , k /= "width"
- , k /= "height"]
+ , k /= "id"]
return $ TagOpen "svg" attrs' :
TagOpen "use" [("href", "#" <> svgid),
("width", "100%"),