diff options
author | John MacFarlane <jgm@berkeley.edu> | 2019-10-09 21:54:41 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2019-10-09 21:54:41 -0700 |
commit | ff1df241a9fcacec8c897cc0f01f691ee5b49a22 (patch) | |
tree | 8a05a7073b5f30bc6d05a8d1392bf266e7c5821d /src/Text/Pandoc/App/CommandLineOptions.hs | |
parent | 070e098b48bfed41b703eec7c62c91c82ad66d26 (diff) | |
download | pandoc-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.hs | 4 |
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") "" |