diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-10-04 00:40:47 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-10-04 00:59:08 -0400 |
| commit | cfe21e85e7fba61ac588e210f2a9b75f8d081f42 (patch) | |
| tree | 3237aa5460cb38254a44a6462c83db3c2276c229 /RemoteLog.hs | |
| parent | ff21fd4a652cc6516d0e06ab885adf1c93eddced (diff) | |
rename
Diffstat (limited to 'RemoteLog.hs')
| -rw-r--r-- | RemoteLog.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/RemoteLog.hs b/RemoteLog.hs index 2e43265f5..4ffe71205 100644 --- a/RemoteLog.hs +++ b/RemoteLog.hs @@ -18,8 +18,8 @@ module RemoteLog ( import qualified Data.Map as M import Data.Char -import AnnexCommon -import qualified Branch +import Annex.Common +import qualified Annex.Branch import Types.Remote import UUID @@ -29,7 +29,7 @@ remoteLog = "remote.log" {- Adds or updates a remote's config in the log. -} configSet :: UUID -> RemoteConfig -> Annex () -configSet u c = Branch.change remoteLog $ +configSet u c = Annex.Branch.change remoteLog $ serialize . M.insert u c . remoteLogParse where serialize = unlines . sort . map toline . M.toList @@ -37,7 +37,7 @@ configSet u c = Branch.change remoteLog $ {- Map of remotes by uuid containing key/value config maps. -} readRemoteLog :: Annex (M.Map UUID RemoteConfig) -readRemoteLog = remoteLogParse <$> Branch.get remoteLog +readRemoteLog = remoteLogParse <$> Annex.Branch.get remoteLog remoteLogParse :: String -> M.Map UUID RemoteConfig remoteLogParse s = |