diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs
index 51a9ea7d6..c6ff70f5b 100644
--- a/src/Text/Pandoc/Writers/Muse.hs
+++ b/src/Text/Pandoc/Writers/Muse.hs
@@ -621,7 +621,7 @@ inlineToMuse (Quoted DoubleQuote lst) = do
   return $ "“" <> contents <> "”"
 inlineToMuse Cite {} =
   throwError $ PandocShouldNeverHappenError
-             $ "Citations should be expanded before normalization"
+               "Citations should be expanded before normalization"
 inlineToMuse (Code _ str) = do
   useTags <- gets stUseTags
   modify $ \st -> st { stUseTags = False }