This commit is contained in:
Joey Hess 2012-01-02 11:57:02 -04:00
parent 442202dd6d
commit 508b427c7b

View file

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