diff options
author | Joey Hess <joey@kitenet.net> | 2013-08-29 18:51:22 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-08-29 19:13:00 -0400 |
commit | 7a53fb249f0c02762d8c13f413e24c5c250167dd (patch) | |
tree | b612c5a8b9c630561ae1ff02dd8cd6c076881f19 /Logs/PreferredContent.hs | |
parent | d3c895b8b328685541cf41e025cff17f94b258b1 (diff) |
refactor git-annex branch log filename code into central location
Having one module that knows about all the filenames used on the branch
allows working back from an arbitrary filename to enough information about
it to implement dropping dead remotes and doing other log file compacting
as part of a forget transition.
Diffstat (limited to 'Logs/PreferredContent.hs')
-rw-r--r-- | Logs/PreferredContent.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/Logs/PreferredContent.hs b/Logs/PreferredContent.hs index 8005fc0d3..947a31875 100644 --- a/Logs/PreferredContent.hs +++ b/Logs/PreferredContent.hs @@ -24,6 +24,7 @@ import Data.Time.Clock.POSIX import Common.Annex import qualified Annex.Branch import qualified Annex +import Logs import Logs.UUIDBased import Limit import qualified Utility.Matcher @@ -35,10 +36,6 @@ import Logs.Group import Logs.Remote import Types.StandardGroups -{- Filename of preferred-content.log. -} -preferredContentLog :: FilePath -preferredContentLog = "preferred-content.log" - {- Changes the preferred content configuration of a remote. -} preferredContentSet :: UUID -> String -> Annex () preferredContentSet uuid@(UUID _) val = do |