From b0457388dc8224907b72005391b6470e92be9c84 Mon Sep 17 00:00:00 2001 From: Willem van den Ende Date: Thu, 30 Apr 2026 17:36:24 +0100 Subject: [PATCH] remove unused parameter --- src/Docster/Compiler.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Docster/Compiler.hs b/src/Docster/Compiler.hs index ad8b127..1c7fa9b 100644 --- a/src/Docster/Compiler.hs +++ b/src/Docster/Compiler.hs @@ -275,7 +275,7 @@ generateOutputM pandoc = do if writesFile then do outputPath <- asks ccOutputPath - _ <- liftIO $ generateOutputFile strategy outputPath pandoc + _ <- liftIO $ generateOutputFile 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 _ 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)