diff options
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/App/CommandLineOptions.hs | 3 | ||||
-rw-r--r-- | src/Text/Pandoc/App/Opt.hs | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/src/Text/Pandoc/App/CommandLineOptions.hs b/src/Text/Pandoc/App/CommandLineOptions.hs index bf1619e30..7d3b935ef 100644 --- a/src/Text/Pandoc/App/CommandLineOptions.hs +++ b/src/Text/Pandoc/App/CommandLineOptions.hs @@ -584,7 +584,8 @@ options = (\arg opt -> return opt { optVariables = - setVariable "title-prefix" arg $ optVariables opt }) + setVariable "title-prefix" arg $ optVariables opt, + optStandalone = True }) "STRING") "" -- "String to prefix to HTML window title" diff --git a/src/Text/Pandoc/App/Opt.hs b/src/Text/Pandoc/App/Opt.hs index 09f018233..4f54bad48 100644 --- a/src/Text/Pandoc/App/Opt.hs +++ b/src/Text/Pandoc/App/Opt.hs @@ -332,7 +332,8 @@ doOpt (k',v) = do "file-scope" -> parseYAML v >>= \x -> return (\o -> o{ optFileScope = x }) "title-prefix" -> - parseYAML v >>= \x -> return (\o -> o{ optTitlePrefix = x }) + parseYAML v >>= \x -> return (\o -> o{ optTitlePrefix = x, + optStandalone = True }) "css" -> (parseYAML v >>= \x -> return (\o -> o{ optCss = optCss o <> map unpack x })) |