aboutsummaryrefslogtreecommitdiff
path: root/CmdLine
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-12-01 00:41:01 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-12-01 00:42:01 -0400
commit753793371aa6595e41b095952f5d67563e103290 (patch)
treee3517926ab3483e77e95cba627dbfd7dfc9513c1 /CmdLine
parent8fac3e5732cc379f602977cd5ea2ba684556fe85 (diff)
cleanups
Diffstat (limited to 'CmdLine')
-rw-r--r--CmdLine/GitRemoteTorAnnex.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/CmdLine/GitRemoteTorAnnex.hs b/CmdLine/GitRemoteTorAnnex.hs
index 72211c995..517ce7c82 100644
--- a/CmdLine/GitRemoteTorAnnex.hs
+++ b/CmdLine/GitRemoteTorAnnex.hs
@@ -66,7 +66,7 @@ connectService address port service = do
, runIhdl = h
, runOhdl = h
}
- runNetProtoHandle runenv $ do
+ liftIO $ runNetProto runenv $ do
v <- auth myuuid authtoken
case v of
Just _theiruuid -> connect service stdin stdout