From 1827d467395e66993b38c1b6269e4832abb3cc26 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 7 Dec 2016 13:37:35 -0400 Subject: update progress meter when sending to p2p remote This commit was sponsored by Thom May on Patreon. --- Remote/P2P.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'Remote/P2P.hs') diff --git a/Remote/P2P.hs b/Remote/P2P.hs index f4f1d5f38..8286a9a18 100644 --- a/Remote/P2P.hs +++ b/Remote/P2P.hs @@ -73,10 +73,9 @@ chainGen addr r u c gc = do } return (Just this) --- TODO update progress store :: UUID -> P2PAddress -> ConnectionPool -> Key -> AssociatedFile -> MeterUpdate -> Annex Bool store u addr connpool k af p = fromMaybe False - <$> runProto u addr connpool (P2P.put k af) + <$> runProto u addr connpool (P2P.put k af p) retrieve :: UUID -> P2PAddress -> ConnectionPool -> Key -> AssociatedFile -> FilePath -> MeterUpdate -> Annex (Bool, Verification) retrieve u addr connpool k af dest _p = unVerified $ fromMaybe False -- cgit v1.2.3