From 78d3add86b564149cd1e7c4527deffbf30cf839b Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 26 Aug 2012 14:26:43 -0400 Subject: tweak field name --- Assistant/Threads/NetWatcher.hs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'Assistant/Threads/NetWatcher.hs') diff --git a/Assistant/Threads/NetWatcher.hs b/Assistant/Threads/NetWatcher.hs index 2f71b0825..117ab7a20 100644 --- a/Assistant/Threads/NetWatcher.hs +++ b/Assistant/Threads/NetWatcher.hs @@ -128,6 +128,5 @@ handleConnection st dstatus scanremotes = do {- Finds network remotes. -} networkRemotes :: ThreadState -> IO [Remote] -networkRemotes st = runThreadState st $ do - rs <- remoteList - return $ filter (isNothing . Remote.path) rs +networkRemotes st = runThreadState st $ + filter (isNothing . Remote.localpath) <$> remoteList -- cgit v1.2.3