@@ -621,7 +621,7 @@ inlineToMuse (Quoted DoubleQuote lst) = do
621 return $ "“" <> contents <> "”"
621 return $ "“" <> contents <> "”"
622inlineToMuse Cite {} =
622inlineToMuse Cite {} =
623 throwError $ PandocShouldNeverHappenError
623 throwError $ PandocShouldNeverHappenError
624− $ "Citations should be expanded before normalization"
624+ "Citations should be expanded before normalization"
625inlineToMuse (Code _ str) = do
625inlineToMuse (Code _ str) = do
626 useTags <- gets stUseTags
626 useTags <- gets stUseTags
627 modify $ \st -> st { stUseTags = False }
627 modify $ \st -> st { stUseTags = False }