diff options
| -rw-r--r-- | src/Text/Pandoc/App.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs index a80c6ac44..f0e953d53 100644 --- a/src/Text/Pandoc/App.hs +++ b/src/Text/Pandoc/App.hs @@ -493,7 +493,7 @@ convertWithOpts opts = do report $ Deprecated "markdown_github" "Use gfm instead." setResourcePath (optResourcePath opts) - mapM_ (\(n,v) -> setRequestHeader n v) (optRequestHeaders opts) + mapM_ (uncurry setRequestHeader) (optRequestHeaders opts) doc <- sourceToDoc sources >>= ( (if isJust (optExtractMedia opts) |