git.iko.soy/typeable/pandoc
on master help sign in
LaTeX writer: separate successive quote chars with thin space
eb3dff1Albert Krewinkel
src/Text/Pandoc/Writers/LaTeX.hs+3−2
@@ -894,8 +894,9 @@ inlineToLaTeX (Quoted qt lst) = do
894 then char '`' <> inner <> char '\''
894 then char '`' <> inner <> char '\''
895 else char '\x2018' <> inner <> char '\x2019'
895 else char '\x2018' <> inner <> char '\x2019'
896 where
896 where
897+ isQuoted (Span _ (x:_)) = isQuoted x
897− isQuoted (Quoted _ _) = True
898+ isQuoted (Quoted _ _) = True
898− isQuoted _ = False
899+ isQuoted _ = False
899inlineToLaTeX (Str str) = do
900inlineToLaTeX (Str str) = do
900 setEmptyLine False
901 setEmptyLine False
901 liftM literal $ stringToLaTeX TextString str
902 liftM literal $ stringToLaTeX TextString str
test/command/6958.mdnew file+10
@@ -0,0 +1,10 @@
1+Add thin space between single and double quotes.
2+```
3+% pandoc -t latex+smart
4+---
5+lang: en-GB
6+---
7+'["On the Outside"]{}: Constructing Cycling Citizenship.'
8+^D
9+`\,{``On the Outside''}: Constructing Cycling Citizenship.'
10+```