assistant: Fix syncing local drives.

Amoung other things, this makes it immediately sync files from a removable
drive when it's added.

Assistant/Sync.hs

@@ -43,18 +43,21 @@ reconnectRemotes notifypushes rs = void $ do
 			=<< liftAnnex (inRepo Git.Branch.current)
 		addScanRemotes diverged rs
 		return ok
-	where
+  where
-		(gitremotes, _specialremotes) =
+	gitremotes = filter (notspecialremote . Remote.repo) rs
-			partition (Git.repoIsUrl . Remote.repo) rs
+	notspecialremote r
-		sync (Just branch) = do
+		| Git.repoIsUrl r = True
-			diverged <- snd <$> manualPull (Just branch) gitremotes
+		| Git.repoIsLocal r = True
-			now <- liftIO getCurrentTime
+		| otherwise = False
-			ok <- pushToRemotes now notifypushes gitremotes
+	sync (Just branch) = do
-			return (ok, diverged)
+		diverged <- snd <$> manualPull (Just branch) gitremotes
-		{- No local branch exists yet, but we can try pulling. -}
+		now <- liftIO getCurrentTime
-		sync Nothing = do
+		ok <- pushToRemotes now notifypushes gitremotes
-			diverged <- snd <$> manualPull Nothing gitremotes
+		return (ok, diverged)
-			return (True, diverged)
+	{- No local branch exists yet, but we can try pulling. -}
+	sync Nothing = do
+		diverged <- snd <$> manualPull Nothing gitremotes
+		return (True, diverged)
 
 {- Updates the local sync branch, then pushes it to all remotes, in
  - parallel, along with the git-annex branch. This is the same

debian/changelog

@@ -34,6 +34,7 @@ git-annex (3.20121018) UNRELEASED; urgency=low
   * The standalone tarball's runshell now takes care of installing a
     ~/.ssh/git-annex-shell wrapper the first time it's run.
   * webapp: Make an initial, empty commit so there is a master branch 
+  * assistant: Fix syncing local drives.
 
  -- Joey Hess <joeyh@debian.org>  Wed, 17 Oct 2012 14:24:10 -0400