missed a printVerbose
This commit is contained in:
parent
7c6102ac63
commit
aff6f513e9
1 changed files with 2 additions and 2 deletions
|
@ -71,9 +71,9 @@ main = do
|
|||
main2 opts
|
||||
|
||||
main2 :: Options -> IO ()
|
||||
main2 (Options {mode = SinglePage {file, includeNsfw, output}}) = do
|
||||
main2 opts@(Options {mode = SinglePage {file, includeNsfw, output}}) = do
|
||||
info <- readYAML file
|
||||
print info
|
||||
printVerbose opts info
|
||||
let page = make includeNsfw info
|
||||
case output of
|
||||
Nothing -> Text.putStr page
|
||||
|
|
Loading…
Reference in a new issue