From 8abe1d1bc24ec88631ac3c161d9debb6c75c8034 Mon Sep 17 00:00:00 2001
From: Willem van den Ende <willem@qwan.eu>
Date: Thu, 30 Apr 2026 17:33:27 +0100
Subject: [PATCH] resolve compiler warnings

---
 src/Docster/Compiler.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Docster/Compiler.hs b/src/Docster/Compiler.hs
index e7220e5..ad8b127 100644
--- a/src/Docster/Compiler.hs
+++ b/src/Docster/Compiler.hs
@@ -13,7 +13,7 @@ import Docster.Types
   ( DocsterError(..), OutputFormat(..), SourceDir(..), OutputDir(..), OutputPath(..)
   , DiagramConfig(..), computeOutputDir, ensureOutputDir
   )
-import Text.Pandoc.Writers (writeDocx)
+import Text.Pandoc.Writers ()
 import qualified Data.ByteString.Lazy as BSL
 import Docster.Transform (transformDocument)
 import Docster.LaTeX (latexTemplate)
@@ -275,7 +275,7 @@ generateOutputM pandoc = do
   if writesFile
     then do
       outputPath <- asks ccOutputPath
-      liftIO $ generateOutputFile strategy outputPath pandoc
+      _ <- liftIO $ generateOutputFile strategy outputPath pandoc
       return ""  -- placeholder, won't be used
     else liftEitherM $ generateOutput strategy pandoc
 
@@ -328,7 +328,7 @@ generateOutput strategy transformed = do
 
 -- | Generate output file directly (for DOCX which writes to file)
 generateOutputFile :: CompilationStrategy -> FilePath -> Pandoc -> IO (Either DocsterError ())
-generateOutputFile strategy outputPath pandoc = do
+generateOutputFile _ outputPath pandoc = do
   result <- runIO $ writeDocx def pandoc
   case result of
     Left err -> return $ Left $ FileError $ "DOCX generation failed: " <> T.pack (show err)