diff options
Diffstat (limited to 'Remote/Directory.hs')
-rw-r--r-- | Remote/Directory.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |