@@ -372,10 +372,11 @@ inlineToLaTeX (Cite cits lst) = do
373inlineToLaTeX (Code _ str) = do
373inlineToLaTeX (Code _ str) = do
374 st <- get
374 st <- get
375− when (stInNote st) $ modify $ \s -> s{ stVerbInNote = True }
376− let chr = ((enumFromTo '!' '~') \\ str) !! 0
377 if writerListings (stOptions st)
375 if writerListings (stOptions st)
377+ when (stInNote st) $ modify $ \s -> s{ stVerbInNote = True }
378+ let chr = ((enumFromTo '!' '~') \\ str) !! 0
378− then return $ text $ "\\lstinline" ++ [chr] ++ str ++ [chr]
379+ return $ text $ "\\lstinline" ++ [chr] ++ str ++ [chr]
379 else return $ text $ "\\texttt{" ++ stringToLaTeX str ++ "}"
380 else return $ text $ "\\texttt{" ++ stringToLaTeX str ++ "}"
380inlineToLaTeX (Quoted SingleQuote lst) = do
381inlineToLaTeX (Quoted SingleQuote lst) = do
381 contents <- inlineListToLaTeX lst
382 contents <- inlineListToLaTeX lst