git.iko.soy/typeable/pandoc
on master help sign in
TEI writer: Use height instead of depth for images.
8bdbdc2John MacFarlane
src/Text/Pandoc/Writers/TEI.hs+1−1
@@ -145,7 +145,7 @@ imageToTEI :: PandocMonad m => WriterOptions -> Attr -> String -> m Doc
145imageToTEI _ attr src = return $ selfClosingTag "graphic" $
145imageToTEI _ attr src = return $ selfClosingTag "graphic" $
146 ("url", src) : idAndRole attr ++ dims
146 ("url", src) : idAndRole attr ++ dims
147 where
147 where
148− dims = go Width "width" ++ go Height "depth"
148+ dims = go Width "width" ++ go Height "height"
149 go dir dstr = case dimension dir attr of
149 go dir dstr = case dimension dir attr of
150 Just a -> [(dstr, show a)]
150 Just a -> [(dstr, show a)]
151 Nothing -> []
151 Nothing -> []