From 425bc1107aebdb701cdcee44da731dd918cd470d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 9 Jan 2015 13:11:56 -0400 Subject: revert parentDir change Reverts 2bba5bc22d049272d3328bfa6c452d3e2e50e86c Unfortunately, this caused breakage on Windows, and possibly elsewhere, because parentDir and takeDirectory do not behave the same when there is a trailing directory separator. --- Config/Files.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Config') diff --git a/Config/Files.hs b/Config/Files.hs index edea83eeb..8d5c1fd12 100644 --- a/Config/Files.hs +++ b/Config/Files.hs @@ -33,7 +33,7 @@ modifyAutoStartFile func = do let dirs' = nubBy equalFilePath $ func dirs when (dirs' /= dirs) $ do f <- autoStartFile - createDirectoryIfMissing True (takeDirectory f) + createDirectoryIfMissing True (parentDir f) viaTmp writeFile f $ unlines dirs' {- Adds a directory to the autostart file. If the directory is already -- cgit v1.2.3