aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/App/CommandLineOptions.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2019-10-09 21:54:41 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2019-10-09 21:54:41 -0700
commitff1df241a9fcacec8c897cc0f01f691ee5b49a22 (patch)
tree8a05a7073b5f30bc6d05a8d1392bf266e7c5821d /src/Text/Pandoc/App/CommandLineOptions.hs
parent070e098b48bfed41b703eec7c62c91c82ad66d26 (diff)
downloadpandoc-ff1df241a9fcacec8c897cc0f01f691ee5b49a22.tar.gz
T.P.App.Opt: rename optReader, optWriter as optFrom, optTo.
This will allow to: and from: in defaults.
Diffstat (limited to 'src/Text/Pandoc/App/CommandLineOptions.hs')
-rw-r--r--src/Text/Pandoc/App/CommandLineOptions.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/App/CommandLineOptions.hs b/src/Text/Pandoc/App/CommandLineOptions.hs
index 8ff7c70e3..e23452b3b 100644
--- a/src/Text/Pandoc/App/CommandLineOptions.hs
+++ b/src/Text/Pandoc/App/CommandLineOptions.hs
@@ -131,14 +131,14 @@ options =
, Option "fr" ["from","read"]
(ReqArg
- (\arg opt -> return opt { optReader =
+ (\arg opt -> return opt { optFrom =
Just (map toLower arg) })
"FORMAT")
""
, Option "tw" ["to","write"]
(ReqArg
- (\arg opt -> return opt { optWriter = Just arg })
+ (\arg opt -> return opt { optTo = Just arg })
"FORMAT")
""