diff options
Diffstat (limited to 'Assistant/Threads/NetWatcher.hs')
-rw-r--r-- | Assistant/Threads/NetWatcher.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Threads/NetWatcher.hs b/Assistant/Threads/NetWatcher.hs index b52657990..e9af2a53b 100644 --- a/Assistant/Threads/NetWatcher.hs +++ b/Assistant/Threads/NetWatcher.hs @@ -34,7 +34,7 @@ thisThread :: ThreadName thisThread = "NetWatcher" netWatcherThread :: ThreadState -> DaemonStatusHandle -> ScanRemoteMap -> NamedThread -netWatcherThread st dstatus scanremotes = thread $ do +netWatcherThread st dstatus scanremotes = thread $ #if WITH_DBUS dbusThread st dstatus scanremotes #else @@ -49,7 +49,7 @@ netWatcherThread st dstatus scanremotes = thread $ do - while (despite the local network staying up), are synced with - periodically. -} netWatcherFallbackThread :: ThreadState -> DaemonStatusHandle -> ScanRemoteMap -> NamedThread -netWatcherFallbackThread st dstatus scanremotes = thread $ do +netWatcherFallbackThread st dstatus scanremotes = thread $ runEvery (Seconds 3600) $ handleConnection st dstatus scanremotes where |