diff options
Diffstat (limited to 'src/Text/Pandoc/App/CommandLineOptions.hs')
| -rw-r--r-- | src/Text/Pandoc/App/CommandLineOptions.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Text/Pandoc/App/CommandLineOptions.hs b/src/Text/Pandoc/App/CommandLineOptions.hs index 9f1905741..c6f88af24 100644 --- a/src/Text/Pandoc/App/CommandLineOptions.hs +++ b/src/Text/Pandoc/App/CommandLineOptions.hs @@ -278,7 +278,7 @@ options = , Option "H" ["include-in-header"] (ReqArg (\arg opt -> return opt{ optIncludeInHeader = - arg : optIncludeInHeader opt, + optIncludeInHeader opt ++ [arg], optStandalone = True }) "FILE") "" -- "File to include at end of header (implies -s)" @@ -286,7 +286,7 @@ options = , Option "B" ["include-before-body"] (ReqArg (\arg opt -> return opt{ optIncludeBeforeBody = - arg : optIncludeBeforeBody opt, + optIncludeBeforeBody opt ++ [arg], optStandalone = True }) "FILE") "" -- "File to include before document body" @@ -294,7 +294,7 @@ options = , Option "A" ["include-after-body"] (ReqArg (\arg opt -> return opt{ optIncludeAfterBody = - arg : optIncludeAfterBody opt, + optIncludeAfterBody opt ++ [arg], optStandalone = True }) "FILE") "" -- "File to include after document body" @@ -583,7 +583,7 @@ options = , Option "c" ["css"] (ReqArg - (\arg opt -> return opt{ optCss = arg : optCss opt }) + (\arg opt -> return opt{ optCss = optCss opt ++ [arg] }) -- add new link to end, so it is included in proper order "URL") "" -- "Link to CSS style sheet" |