diff options
author | Joey Hess <joey@kitenet.net> | 2011-10-15 16:21:08 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-10-15 16:21:08 -0400 |
commit | 1a29b5b52eec641a5456d7c8dc24356c90107bc0 (patch) | |
tree | 0b902c278129bd085e8db986af168a4e46d3dea6 /Remote.hs | |
parent | 279150ccd5ad937a44cbff798ab7bb118ad1dbee (diff) |
reorganize log modules
no code changes
Diffstat (limited to 'Remote.hs')
-rw-r--r-- | Remote.hs | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -34,12 +34,12 @@ import Text.JSON.Generic import Common.Annex import Types.Remote -import UUID import qualified Annex import Config -import Trust -import LocationLog -import RemoteLog +import Logs.UUID +import Logs.Trust +import Logs.Location +import Logs.Remote import qualified Remote.Git import qualified Remote.S3 @@ -163,12 +163,12 @@ remotesWithUUID rs us = filter (\r -> uuid r `elem` us) rs remotesWithoutUUID :: [Remote Annex] -> [UUID] -> [Remote Annex] remotesWithoutUUID rs us = filter (\r -> uuid r `notElem` us) rs -{- Cost ordered lists of remotes that the LocationLog indicate may have a key. +{- Cost ordered lists of remotes that the Logs.Location indicate may have a key. -} keyPossibilities :: Key -> Annex [Remote Annex] keyPossibilities key = fst <$> keyPossibilities' False key -{- Cost ordered lists of remotes that the LocationLog indicate may have a key. +{- Cost ordered lists of remotes that the Logs.Location indicate may have a key. - - Also returns a list of UUIDs that are trusted to have the key - (some may not have configured remotes). |