debug

2023-10-15 13:09:08 +03:00 · 2023-10-15 13:09:08 +03:00 · be67ff026e
parent d3c63ab8e4
commit be67ff026e
1 changed files with 1 additions and 0 deletions
--- a/hbs2-git/reposync/ReposyncMain.hs
+++ b/hbs2-git/reposync/ReposyncMain.hs
@ -136,6 +136,7 @@ withConfig cfg m = do
                liftIO do
                  let conf = defConfDir </> "config"
                  createDirectoryIfMissing True defConfDir
+                  debug $ "config-dir" <+> pretty defConfDir
                  appendFile conf ""
                  pure conf