diff options
author | Joey Hess <joey@kitenet.net> | 2011-01-16 16:05:05 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-01-16 16:05:05 -0400 |
commit | e7b557ef5d347831142fd98eac901d79c7e1305d (patch) | |
tree | dbd5d0bcb578e457a6bb23a856b27f4aa27abd36 /Remotes.hs | |
parent | 84836ed804633fa3d8ff50064331b8b90bb160dd (diff) |
got rid of Core module
Most of it was to do with managing annexed Content, so put there
Diffstat (limited to 'Remotes.hs')
-rw-r--r-- | Remotes.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Remotes.hs b/Remotes.hs index a7a1db415..9004b33d0 100644 --- a/Remotes.hs +++ b/Remotes.hs @@ -34,7 +34,7 @@ import LocationLog import Locations import UUID import Utility -import qualified Core +import qualified Content import Messages import CopyFile import RsyncFile @@ -159,7 +159,7 @@ inAnnex r key = if Git.repoIsUrl r -- run a local check inexpensively, -- by making an Annex monad using the remote a <- Annex.new r [] - Annex.eval a (Core.inAnnex key) + Annex.eval a (Content.inAnnex key) checkremote = do showNote ("checking " ++ Git.repoDescribe r ++ "...") inannex <- onRemote r (boolSystem, False) "inannex" @@ -253,7 +253,7 @@ copyToRemote r key liftIO $ do a <- Annex.new r [] Annex.eval a $ do - ok <- Core.getViaTmp key $ + ok <- Content.getViaTmp key $ \f -> liftIO $ copyFile keysrc f Annex.queueRun return ok |