diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-02-01 11:38:33 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-02-01 11:38:33 -0800 |
| commit | 8bdbdc24deba5c32950d781b533d132100a77b26 (patch) | |
| tree | a94adf514130c5da35ec5537c9177400972c3449 /src | |
| parent | c501942866e2017eacb8b04db3b5ed3a8869d0df (diff) | |
| download | pandoc-8bdbdc24deba5c32950d781b533d132100a77b26.tar.gz | |
TEI writer: Use height instead of depth for images.
Closes #4331.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/TEI.hs | 2 |
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 -> [] |