@@ -110,7 +110,8 @@ parseOptions options' defaults = do
110110 let (actions, args, unrecognizedOpts, errors) =
111111 getOpt' Permute options' rawArgs
112112
113− let unknownOptionErrors = foldr handleUnrecognizedOption [] unrecognizedOpts
113+ let unknownOptionErrors = foldr handleUnrecognizedOption [] $
114+ map (takeWhile (/= '=')) unrecognizedOpts
114115
115116 unless (null errors && null unknownOptionErrors) $
116117 E.throwIO $ PandocOptionError $