mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions 1

move to debug

Browse source
This commit is contained in:
Joey Hess 2016-12-08 15:56:36 -04:00
parent af41519126
commit 23438fb80f
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
1 changed files with 4 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
RemoteDaemon/Transport/Tor.hs
View file

@ -95,12 +95,10 @@ serveClient th u r q = bracket setup cleanup go
Right (Just theiruuid) -> void $ Right (Just theiruuid) -> void $
runFullProto (Serving theiruuid) conn $ runFullProto (Serving theiruuid) conn $
serveAuthed u serveAuthed u
Right Nothing -> do Right Nothing -> liftIO $
liftIO $ debugM "remotedaemon" "TOR connection failed to authenticate" debugM "remotedaemon" "TOR connection failed to authenticate"
return () Left e -> liftIO $
Left e -> do debugM "remotedaemon" ("Error while serving TOR connection: " ++ e)
warning e
return ()
-- Merge the duplicated state back in. -- Merge the duplicated state back in.
liftAnnex th $ mergeState st' liftAnnex th $ mergeState st'
debugM "remotedaemon" "done with TOR connection" debugM "remotedaemon" "done with TOR connection"