diff options
Diffstat (limited to 'src/Text/Pandoc/App.hs')
| -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 38a469669..ed5963f1a 100644 --- a/src/Text/Pandoc/App.hs +++ b/src/Text/Pandoc/App.hs @@ -136,7 +136,7 @@ convertWithOpts opts = do setOutputFile (optOutputFile opts) -- assign reader and writer based on options and filenames - readerName <- case optReader opts of + readerName <- case optFrom opts of Just f -> return f Nothing -> case formatFromFilePaths sources of Just f' -> return f' |