diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2017-08-29 14:58:38 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-08-29 15:10:01 -0400 |
| commit | 44d71938c6535f207932799ea3e231dc78bcb8de (patch) | |
| tree | d66bea23fe7d0ad4cf34adcc9b4324ba58191e4f /Remote/Directory.hs | |
| parent | b0836c1a8ce6edb0604648c1fcf4396f43ebd998 (diff) | |
initial export command
Very basic operation works, but of course this is only the beginning.
This commit was sponsored by Nick Daly on Patreon.
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 342b5bc57..7f0f46512 100644 --- a/Remote/Directory.hs +++ b/Remote/Directory.hs @@ -235,7 +235,7 @@ exportPath d (ExportLocation loc) = d </> loc storeExportDirectory :: FilePath -> FilePath -> Key -> ExportLocation -> MeterUpdate -> Annex Bool storeExportDirectory d src _k loc p = liftIO $ catchBoolIO $ do - createDirectoryIfMissing True dest + createDirectoryIfMissing True (takeDirectory dest) withMeteredFile src p (L.writeFile dest) return True where |