summaryrefslogtreecommitdiff
path: root/Assistant/Threads/TransferWatcher.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-10-14 14:51:11 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-10-14 14:51:11 -0400
commit1c42979918649797c239e0441ccf531ebde430eb (patch)
tree3a89da52dc6ef2c6a7084c5509bfd0d04e0ddf96 /Assistant/Threads/TransferWatcher.hs
parent83c8c3104583d6fea4c44751b39191b1f4af443f (diff)
fix display of transfers for remotes not in syncRemotes list
Diffstat (limited to 'Assistant/Threads/TransferWatcher.hs')
-rw-r--r--Assistant/Threads/TransferWatcher.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Threads/TransferWatcher.hs b/Assistant/Threads/TransferWatcher.hs
index 95a594d5d..a54128cb6 100644
--- a/Assistant/Threads/TransferWatcher.hs
+++ b/Assistant/Threads/TransferWatcher.hs
@@ -67,8 +67,8 @@ onAdd st dstatus _ file _ = case parseTransferFile file of
[ "transfer starting:"
, show t
]
- r <- headMaybe . filter (sameuuid t) . syncRemotes
- <$> getDaemonStatus dstatus
+ r <- headMaybe . filter (sameuuid t)
+ <$> runThreadState st Remote.remoteList
updateTransferInfo dstatus t info
{ transferRemote = r }
sameuuid t r = Remote.uuid r == transferUUID t