diff options
| -rw-r--r-- | Assistant/Threads/MountWatcher.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Assistant/Threads/MountWatcher.hs b/Assistant/Threads/MountWatcher.hs index 39ae67537..bd7aad69c 100644 --- a/Assistant/Threads/MountWatcher.hs +++ b/Assistant/Threads/MountWatcher.hs @@ -63,7 +63,11 @@ dbusThread urlrenderer = do wasmounted <- liftIO $ swapMVar mvar nowmounted handleMounts urlrenderer wasmounted nowmounted liftIO $ forM_ mountChanged $ \matcher -> +#if MIN_VERSION_dbus(0,10,7) + void $ addMatch client matcher handleevent +#else listen client matcher handleevent +#endif , do liftAnnex $ warning "No known volume monitor available through dbus; falling back to mtab polling" |