summaryrefslogtreecommitdiff
path: root/Remotes.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-31 23:24:16 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-31 23:24:16 -0400
commit00d4c7cd01b6f6e863a22483b9ea20ca5260da43 (patch)
tree2c345eb26dfab3f8bc107764f20343fecb45014e /Remotes.hs
parentf3e4633e359d0a4afc7a0f90a89e4d276b597d84 (diff)
simplify evals
Diffstat (limited to 'Remotes.hs')
-rw-r--r--Remotes.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Remotes.hs b/Remotes.hs
index a01da7d48..2879516fe 100644
--- a/Remotes.hs
+++ b/Remotes.hs
@@ -93,8 +93,7 @@ inAnnex r key = do
-- run a local check by making an Annex monad
-- using the remote
a <- Annex.new r []
- (result, _) <- Annex.run a (Core.inAnnex key)
- return result
+ Annex.eval a (Core.inAnnex key)
remote = do
-- remote check via ssh in and test
boolSystem "ssh" [Git.urlHost r, "test -e " ++