From 7dcc273ec92892bdc55f9f8d9802f2e4edeca4c5 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 6 Sep 2017 15:48:14 -0400 Subject: rename bug fix --- Remote/Directory.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Remote') diff --git a/Remote/Directory.hs b/Remote/Directory.hs index 7769eddd2..512ba1cef 100644 --- a/Remote/Directory.hs +++ b/Remote/Directory.hs @@ -261,7 +261,7 @@ checkPresentExportDirectory d _k loc = renameExportDirectory :: FilePath -> Key -> ExportLocation -> ExportLocation -> Annex Bool renameExportDirectory d _k oldloc newloc = liftIO $ catchBoolIO $ do - createDirectoryIfMissing True dest + createDirectoryIfMissing True (takeDirectory dest) renameFile src dest removeExportLocation d oldloc return True -- cgit v1.2.3