Also use DepGenM' for MakeDir

This commit is contained in:
Niels G. W. Serup 2024-09-24 22:44:45 +02:00
parent 67bfa01b67
commit 8bf1e107a0
No known key found for this signature in database
GPG Key ID: 38EEEBCE67324F19
1 changed files with 4 additions and 2 deletions

View File

@ -111,8 +111,10 @@ convertImage = runFunctionIO ConvertImage
saveFile :: Token (String, FilePath) -> DepGenM () saveFile :: Token (String, FilePath) -> DepGenM ()
saveFile = runFunctionIO SaveFile saveFile = runFunctionIO SaveFile
makeDir :: Token FilePath -> DepGenM () makeDir :: Token FilePath -> DepGenM' ()
makeDir = runFunctionIO MakeDir makeDir input = do
_ <- runFunctionIO MakeDir input
pure ()
runPandoc :: Token (FilePath, FilePath) -> DepGenM () runPandoc :: Token (FilePath, FilePath) -> DepGenM ()
runPandoc = runFunctionIO RunPandoc runPandoc = runFunctionIO RunPandoc