diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-11-10 16:35:09 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-11-10 16:36:21 -0400 |
| commit | d55ec6c25e8843910930a8e760db9793aad637ec (patch) | |
| tree | 9f33b37d51379765399c6a17e1f5fd257c41f9b7 /Assistant/Sync.hs | |
| parent | c629bc1a599da582be71d497f59dabc1961735d3 (diff) | |
show when a buddy is already paired
Diffstat (limited to 'Assistant/Sync.hs')
| -rw-r--r-- | Assistant/Sync.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs index 8815f40c8..ae2b5ea36 100644 --- a/Assistant/Sync.hs +++ b/Assistant/Sync.hs @@ -27,7 +27,6 @@ import Annex.UUID import Data.Time.Clock import qualified Data.Map as M -import qualified Data.Text as T import Control.Concurrent {- Syncs with remotes that may have been disconnected for a while. @@ -176,12 +175,3 @@ syncNewRemote remote = do thread <- asIO $ do reconnectRemotes False [remote] void $ liftIO $ forkIO $ thread - -{- Remotes using the XMPP transport have urls like xmpp::user@host -} -isXMPPRemote :: Remote -> Bool -isXMPPRemote remote = Git.repoIsUrl r && "xmpp::" `isPrefixOf` Git.repoLocation r - where - r = Remote.repo remote - -getXMPPClientID :: Remote -> ClientID -getXMPPClientID r = T.pack $ drop (length "xmpp::") (Git.repoLocation (Remote.repo r)) |