diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs
index e965771b7..a80c6ac44 100644
--- a/src/Text/Pandoc/App.hs
+++ b/src/Text/Pandoc/App.hs
@@ -113,7 +113,7 @@ parseOptions options' defaults = do
            getOpt' Permute options' rawArgs
 
   let unknownOptionErrors =
-       foldr (handleUnrecognizedOption . (takeWhile (/= '='))) []
+       foldr (handleUnrecognizedOption . takeWhile (/= '=')) []
        unrecognizedOpts
 
   unless (null errors && null unknownOptionErrors) $