From 2bba5bc22d049272d3328bfa6c452d3e2e50e86c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 6 Jan 2015 18:29:07 -0400 Subject: made parentDir return a Maybe FilePath; removed most uses of it parentDir is less safe than takeDirectory, especially when working with relative FilePaths. It's really only useful in loops that want to terminate at / This commit was sponsored by Audric SCHILTKNECHT. --- Command/ImportFeed.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command/ImportFeed.hs') diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs index c45fad961..05dc4f3e4 100644 --- a/Command/ImportFeed.hs +++ b/Command/ImportFeed.hs @@ -311,7 +311,7 @@ checkFeedBroken' url f = do now <- liftIO getCurrentTime case prev of Nothing -> do - createAnnexDirectory (parentDir f) + createAnnexDirectory (takeDirectory f) liftIO $ writeFile f $ show now return False Just prevtime -> do -- cgit v1.2.3