voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

removed debug print

This commit is contained in:
Dmitry Zuikov 2023-10-16 15:49:21 +03:00
parent 06970f527b
commit b7d0e1730d
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hbs2-git/lib/HBS2Git/Import.hs
View File

@ -171,12 +171,6 @@ importRefLogNew opts ref = runResourceT do
let myTempDir = "hbs-git" let myTempDir = "hbs-git"
temp <- liftIO getTemporaryDirectory temp <- liftIO getTemporaryDirectory
wtf <- liftIO getEnvironment
hPrint stderr $ "CREATE TEMP DIR" <+> pretty temp <> line <> pretty wtf
-- liftIO $ void $ createDirectoryIfMissing True temp
(_,dir) <- allocate (createTempDirectory temp myTempDir) removeDirectoryRecursive (_,dir) <- allocate (createTempDirectory temp myTempDir) removeDirectoryRecursive
lift $ makePolled ref lift $ makePolled ref