remove debug print

This commit is contained in:
Joey Hess 2013-03-17 15:44:14 -04:00
parent 3eb2d971ee
commit 69cc00c5fc

View file

@ -53,8 +53,6 @@ calcSyncRemotes = do
let good r = Remote.uuid r `elem` alive let good r = Remote.uuid r `elem` alive
let syncable = filter good rs let syncable = filter good rs
let nonxmpp = filter (not . isXMPPRemote) syncable let nonxmpp = filter (not . isXMPPRemote) syncable
liftIO $ print (nonxmpp, map Remote.globallyAvailable nonxmpp)
return $ \dstatus -> dstatus return $ \dstatus -> dstatus
{ syncRemotes = syncable { syncRemotes = syncable