summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-02-01 11:38:33 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2018-02-01 11:38:33 -0800
commit8bdbdc24deba5c32950d781b533d132100a77b26 (patch)
treea94adf514130c5da35ec5537c9177400972c3449 /src/Text/Pandoc/Writers
parentc501942866e2017eacb8b04db3b5ed3a8869d0df (diff)
TEI writer: Use height instead of depth for images.
Closes #4331.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/TEI.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/TEI.hs b/src/Text/Pandoc/Writers/TEI.hs
index 907e2af24..be1c594aa 100644
--- a/src/Text/Pandoc/Writers/TEI.hs
+++ b/src/Text/Pandoc/Writers/TEI.hs
@@ -145,7 +145,7 @@ imageToTEI :: PandocMonad m => WriterOptions -> Attr -> String -> m Doc
imageToTEI _ attr src = return $ selfClosingTag "graphic" $
("url", src) : idAndRole attr ++ dims
where
- dims = go Width "width" ++ go Height "depth"
+ dims = go Width "width" ++ go Height "height"
go dir dstr = case dimension dir attr of
Just a -> [(dstr, show a)]
Nothing -> []