From aff6f513e960f38cefa3c5eb038917af559ccb6e Mon Sep 17 00:00:00 2001
From: Rhiannon Morris <rhi@rhiannon.website>
Date: Mon, 13 Jul 2020 08:30:25 +0200
Subject: [PATCH] missed a printVerbose

---
 make-pages/Main.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/make-pages/Main.hs b/make-pages/Main.hs
index 2ebf4e3..05e7b07 100644
--- a/make-pages/Main.hs
+++ b/make-pages/Main.hs
@@ -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