@@ -190,7 +190,7 @@ stringToLaTeX _ [] = return ""
190190stringToLaTeX ctx (x:xs) = do
191191 opts <- gets stOptions
192192 rest <- stringToLaTeX ctx xs
193− let ligatures = writerTeXLigatures opts && not (ctx == CodeString)
193+ let ligatures = writerTeXLigatures opts && (ctx /= CodeString)
194194 let isUrl = ctx == URLString
195195 when (x == '€') $
196196 modify $ \st -> st{ stUsesEuro = True }