diff options
author | John MacFarlane <jgm@berkeley.edu> | 2019-01-24 16:21:57 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2019-01-24 16:21:57 -0800 |
commit | b08c8627d30fdaf991fdff1fd7f3d674b356a976 (patch) | |
tree | 706f977056e2e7d37f48ad7852bc32bea6d4541c | |
parent | 22b09d88ff8b13e2bdfa25781d9143878791581c (diff) | |
download | pandoc-b08c8627d30fdaf991fdff1fd7f3d674b356a976.tar.gz |
Allow some command line options to take URL in addition to FILE.
`--include-in-header`, `--include-before-body`, `--include-after-body`
-rw-r--r-- | MANUAL.txt | 6 | ||||
-rw-r--r-- | src/Text/Pandoc/App/OutputSettings.hs | 4 |
2 files changed, 5 insertions, 5 deletions
diff --git a/MANUAL.txt b/MANUAL.txt index 9d26c61fa..4f800a409 100644 --- a/MANUAL.txt +++ b/MANUAL.txt @@ -798,7 +798,7 @@ General writer options {.options} new languages or to use altered syntax definitions for existing languages. -`-H` *FILE*, `--include-in-header=`*FILE* +`-H` *FILE*, `--include-in-header=`*FILE*|*URL* : Include contents of *FILE*, verbatim, at the end of the header. This can be used, for example, to include special @@ -806,7 +806,7 @@ General writer options {.options} repeatedly to include multiple files in the header. They will be included in the order specified. Implies `--standalone`. -`-B` *FILE*, `--include-before-body=`*FILE* +`-B` *FILE*, `--include-before-body=`*FILE*|*URL* : Include contents of *FILE*, verbatim, at the beginning of the document body (e.g. after the `<body>` tag in HTML, or the @@ -815,7 +815,7 @@ General writer options {.options} used repeatedly to include multiple files. They will be included in the order specified. Implies `--standalone`. -`-A` *FILE*, `--include-after-body=`*FILE* +`-A` *FILE*, `--include-after-body=`*FILE*|*URL* : Include contents of *FILE*, verbatim, at the end of the document body (before the `</body>` tag in HTML, or the diff --git a/src/Text/Pandoc/App/OutputSettings.hs b/src/Text/Pandoc/App/OutputSettings.hs index b4bd9a4b2..0f4923ea4 100644 --- a/src/Text/Pandoc/App/OutputSettings.hs +++ b/src/Text/Pandoc/App/OutputSettings.hs @@ -128,8 +128,8 @@ optToOutputSettings opts = do withList f (x:xs) vars = f x vars >>= withList f xs let addContentsAsVariable varname fp vars = do - s <- UTF8.toString <$> readFileStrict fp - return $ (varname, s) : vars + s <- UTF8.toString . fst <$> fetchItem fp + return $ (varname, s) : vars variables <- withList (addStringAsVariable "sourcefile") |