Revert "add windows debug"

This reverts commit 76bfdf6a03.
This commit is contained in:
Joey Hess 2025-01-30 19:03:36 -04:00
parent 76bfdf6a03
commit 29e6b98f8c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -63,7 +63,6 @@ replaceFile' createdirectory file checkres action = withOtherTmp $ \othertmpdir
let basetmp = relatedTemplate' (P.takeFileName file) let basetmp = relatedTemplate' (P.takeFileName file)
#else #else
let basetmp = toRawFilePath "t" let basetmp = toRawFilePath "t"
liftIO $ hPutStrLn stderr $ show ("replaceFile debug", file, P.takeFileName file, relatedTemplate' (P.takeFileName file))
#endif #endif
withTmpDirIn (fromRawFilePath othertmpdir) (toOsPath basetmp) $ \tmpdir -> do withTmpDirIn (fromRawFilePath othertmpdir) (toOsPath basetmp) $ \tmpdir -> do
let tmpfile = toRawFilePath tmpdir P.</> basetmp let tmpfile = toRawFilePath tmpdir P.</> basetmp