diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-12-12 18:23:24 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-12-12 18:30:33 -0400 |
| commit | 543d0d250104c1f5908e1b7b258d36d95488a029 (patch) | |
| tree | 7342d994ac8932ed92b1e14108fdc6bb8e84d84e /Upgrade | |
| parent | da95cbadca5b7ef3058b91a384d5f3a48cc39039 (diff) | |
split out Git/Ref.hs
Diffstat (limited to 'Upgrade')
| -rw-r--r-- | Upgrade/V2.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Upgrade/V2.hs b/Upgrade/V2.hs index 08bf83e83..3440d504b 100644 --- a/Upgrade/V2.hs +++ b/Upgrade/V2.hs @@ -9,6 +9,7 @@ module Upgrade.V2 where import Common.Annex import qualified Git +import qualified Git.Ref import qualified Annex.Branch import Logs.Location import Annex.Content @@ -86,7 +87,7 @@ logFiles dir = return . filter (".log" `isSuffixOf`) push :: Annex () push = do - origin_master <- Annex.Branch.refExists $ Git.Ref "origin/master" + origin_master <- inRepo $ Git.Ref.exists $ Git.Ref "origin/master" origin_gitannex <- Annex.Branch.hasOrigin case (origin_master, origin_gitannex) of (_, True) -> do |