@@ -409,16 +409,6 @@ options =
409409 "FILENAME")
410410 "" -- "File to include after document body"
411411
412− , Option "C" ["custom-header"]
413− (ReqArg
414− (\arg opt -> do
415− text <- UTF8.readFile arg
416− let newVars = ("legacy-header", text) : optVariables opt
417− return opt { optVariables = newVars
418− , optStandalone = True })
419− "FILENAME")
420− "" -- "File to use for custom header (implies -s)"
421−
422412 , Option "T" ["title-prefix"]
423413 (ReqArg
424414 (\arg opt -> do
@@ -635,13 +625,6 @@ main = do
635625 mapM_ (\arg -> UTF8.hPutStrLn stdout arg) args
636626 exitWith ExitSuccess
637627
638− -- warn about deprecated options
639− case lookup "legacy-header" variables of
640− Just _ -> UTF8.hPutStrLn stderr $
641− "Warning: The -C/--custom-header is deprecated.\n" ++
642− "Please transition to using --template instead."
643− Nothing -> return ()
644−
645628 let sources = if ignoreArgs then [] else args
646629
647630 datadir <- case mbDataDir of