summaryrefslogtreecommitdiff
path: root/Annex
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2017-09-18 12:12:11 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2017-09-18 12:38:07 -0400
commit9d2ac4d87dc98bd2ab60da38a7e98f0964fd1595 (patch)
treecd3721adab7588d4d3814a26a58f748117700820 /Annex
parentd5c5e3176d42ca627f21c977c49f1e234f5c1b1a (diff)
lock to avoid more than one export to a remote at a time
This commit was sponsored by Jack Hill on Patreon.
Diffstat (limited to 'Annex')
-rw-r--r--Annex/Locations.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Annex/Locations.hs b/Annex/Locations.hs
index a5de2e4ff..947cceef9 100644
--- a/Annex/Locations.hs
+++ b/Annex/Locations.hs
@@ -37,6 +37,7 @@ module Annex.Locations (
gitAnnexFsckDbLock,
gitAnnexFsckResultsLog,
gitAnnexExportDbDir,
+ gitAnnexExportLock,
gitAnnexScheduleState,
gitAnnexTransferDir,
gitAnnexCredsDir,
@@ -300,6 +301,10 @@ gitAnnexExportDir u r = gitAnnexDir r </> "export" </> fromUUID u
gitAnnexExportDbDir :: UUID -> Git.Repo -> FilePath
gitAnnexExportDbDir u r = gitAnnexExportDir u r </> "db"
+{- Lock file for export state for a special remote. -}
+gitAnnexExportLock :: UUID -> Git.Repo -> FilePath
+gitAnnexExportLock u r = gitAnnexExportDir u r ++ ".lck"
+
{- .git/annex/schedulestate is used to store information about when
- scheduled jobs were last run. -}
gitAnnexScheduleState :: Git.Repo -> FilePath