diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-31 02:34:03 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-31 02:34:03 -0400 |
| commit | acec36711090577752532a39f472e734e6b67fdb (patch) | |
| tree | 6a3a5de0ec092e19c28464f4e2703fda9571b264 /Assistant/Sync.hs | |
| parent | 661eda766a8aa5c548ad89d8360bd4219eea138b (diff) | |
where indentation
Diffstat (limited to 'Assistant/Sync.hs')
| -rw-r--r-- | Assistant/Sync.hs | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs index ccc359672..c2c81c57d 100644 --- a/Assistant/Sync.hs +++ b/Assistant/Sync.hs @@ -133,15 +133,15 @@ pushToRemotes now notifypushes remotes = do , Param $ refspec Annex.Branch.name , Param $ refspec branch ] g - where - {- Push to refs/synced/uuid/branch; this - - avoids cluttering up the branch display. -} - refspec b = concat - [ s - , ":" - , "refs/synced/" ++ fromUUID u ++ "/" ++ s - ] - where s = show $ Git.Ref.base b + where + {- Push to refs/synced/uuid/branch; this + - avoids cluttering up the branch display. -} + refspec b = concat + [ s + , ":" + , "refs/synced/" ++ fromUUID u ++ "/" ++ s + ] + where s = show $ Git.Ref.base b {- Manually pull from remotes and merge their branches. -} manualPull :: Maybe Git.Ref -> [Remote] -> Assistant ([Bool], Bool) |