From d74f3e1f2880ca6b9b7346e984fbd13aa037a0a2 Mon Sep 17 00:00:00 2001 From: Peter Wang Date: Sat, 10 Mar 2012 16:57:37 +1100 Subject: Texinfo writer: retain directories in image paths. --- src/Text/Pandoc/Writers/Texinfo.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Text/Pandoc/Writers/Texinfo.hs b/src/Text/Pandoc/Writers/Texinfo.hs index 563ad7044..45e4c439f 100644 --- a/src/Text/Pandoc/Writers/Texinfo.hs +++ b/src/Text/Pandoc/Writers/Texinfo.hs @@ -415,7 +415,7 @@ inlineToTexinfo (Image alternate (source, _)) = do text (ext ++ "}") where ext = drop 1 $ takeExtension source' - base = takeBaseName source' + base = dropExtension source' source' = if isAbsoluteURI source then source else unEscapeString source -- cgit v1.2.3