diff options
Diffstat (limited to 'Assistant/Threads/MountWatcher.hs')
-rw-r--r-- | Assistant/Threads/MountWatcher.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Assistant/Threads/MountWatcher.hs b/Assistant/Threads/MountWatcher.hs index cc7495602..e52dc9093 100644 --- a/Assistant/Threads/MountWatcher.hs +++ b/Assistant/Threads/MountWatcher.hs @@ -38,13 +38,15 @@ import Data.Word (Word32) thisThread :: ThreadName thisThread = "MountWatcher" -mountWatcherThread :: ThreadState -> DaemonStatusHandle -> ScanRemoteMap -> IO () -mountWatcherThread st handle scanremotes = +mountWatcherThread :: ThreadState -> DaemonStatusHandle -> ScanRemoteMap -> NamedThread +mountWatcherThread st handle scanremotes = thread $ #if WITH_DBUS dbusThread st handle scanremotes #else pollingThread st handle scanremotes #endif + where + thread = NamedThread thisThread #if WITH_DBUS |