mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

tweak

Browse source
This commit is contained in:
Joey Hess 2012-01-02 11:57:02 -04:00
parent 442202dd6d
commit 508b427c7b
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Sync.hs
View file

@ -31,7 +31,7 @@ def = [command "sync" (paramOptional (paramRepeating paramRemote))
-- syncing involves several operations, any of which can independently fail -- syncing involves several operations, any of which can independently fail
seek :: CommandSeek seek :: CommandSeek
seek rs = do seek rs = do
!branch <- fromMaybe nobranch <$> inRepo (Git.Branch.current) !branch <- fromMaybe nobranch <$> inRepo Git.Branch.current
remotes <- syncRemotes rs remotes <- syncRemotes rs
return $ concat $ return $ concat $
[ [ commit ] [ [ commit ]