remove unused parameter

This commit is contained in:
Willem van den Ende 2026-04-30 17:36:24 +01:00
parent 8abe1d1bc2
commit b0457388dc

View File

@ -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)