diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-12-09 16:27:20 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-12-09 16:40:47 -0400 |
| commit | 5a919f01d178b8d6c0bb3b0b40d8c7fea7ff7ac6 (patch) | |
| tree | 3b5da82b53b9550c1c6f637aae981d2252accc0c /RemoteDaemon | |
| parent | 3d6a48572d1b626ef68785d3e7ed400b4016d9e5 (diff) | |
make tor hidden service work when directory watching is not available
Avoid crashing when built w/o inotify..
Diffstat (limited to 'RemoteDaemon')
| -rw-r--r-- | RemoteDaemon/Transport/Tor.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/RemoteDaemon/Transport/Tor.hs b/RemoteDaemon/Transport/Tor.hs index 344d5aefb..6149df376 100644 --- a/RemoteDaemon/Transport/Tor.hs +++ b/RemoteDaemon/Transport/Tor.hs @@ -110,7 +110,7 @@ serveClient th u r q = bracket setup cleanup start liftAnnex th $ mergeState st' authed conn theiruuid = - bracket watchChangedRefs (liftIO . stopWatchingChangedRefs) $ \crh -> do + bracket watchChangedRefs (liftIO . maybe noop stopWatchingChangedRefs) $ \crh -> do v' <- runFullProto (Serving theiruuid crh) conn $ P2P.serveAuthed u case v' of |