pushed Assistant monad down into DaemonStatus code

Currently have three old versions of functions that more reworking is
needed to remove: getDaemonStatusOld, modifyDaemonStatusOld_, and
modifyDaemonStatusOld

Assistant/Sync.hs

@@ -154,6 +154,6 @@ manualPull currentbranch remotes = do
 {- Start syncing a newly added remote, using a background thread. -}
 syncNewRemote :: Remote -> Assistant ()
 syncNewRemote remote = do
-	liftAnnex . updateSyncRemotes =<< getAssistant daemonStatusHandle
+	updateSyncRemotes
 	thread <- asIO2 reconnectRemotes
 	void $ liftIO $ forkIO $ thread False [remote]