From e4612d3adfa85c30b188555c0b30006e7452bbec Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 9 May 2017 19:20:04 -0400 Subject: Fix bug that prevented creating ~/.debug-me/log/remote/ when ~/.debug-me/ didn't already exist. --- Log.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Log.hs') diff --git a/Log.hs b/Log.hs index 1bda5e1..1974b47 100644 --- a/Log.hs +++ b/Log.hs @@ -68,7 +68,7 @@ withSessionLogger subdir sessionid a = bracket setup cleanup go setup = do basedir <- logDir let dir = maybe basedir (basedir ) subdir - createDirectoryIfMissing False dir + createDirectoryIfMissing True dir return $ sessionLogFile dir sessionid cleanup logfile = putStrLn $ "** debug-me session was logged to " ++ logfile go logfile = withFile logfile WriteMode (a . mkLogger) -- cgit v1.2.3