From: Joey Hess <joeyh@joeyh.name>
Date: Fri, 26 Jul 2024 17:55:14 +0000 (-0400)
Subject: oops
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~21^2~228^2~33
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=b028b1a3795fe332843d92423f529db0d0825889;p=git-annex.git

oops
---

diff --git a/P2P/Proxy.hs b/P2P/Proxy.hs
index e78ef5a12e..5a7231b27d 100644
--- a/P2P/Proxy.hs
+++ b/P2P/Proxy.hs
@@ -614,13 +614,13 @@ proxyRequest proxydone proxyparams requestcomplete requestmessage protoerrhandle
 			y $ net $ sendBytes len b nullMeterUpdate
 	
 	relayDATAFinish x y sendsuccessfailure ()
-		| proxyProtocolVersion proxyparams == ProtocolVersion 0 = sendsuccessfailure
+		| proxyClientProtocolVersion proxyparams == ProtocolVersion 0 = sendsuccessfailure
 		-- Protocol version 1 has a VALID or
 		-- INVALID message after the data.
 		| otherwise = relayonemessage x y (\_ () -> sendsuccessfailure)
 
 	relayDATAFinishMulti k rs
-		| proxyProtocolVersion proxyparams == ProtocolVersion 0 =
+		| proxyClientProtocolVersion proxyparams == ProtocolVersion 0 =
 			finish $ net receiveMessage
 		| otherwise =
 			flip protoerrhandler (client $ net $ receiveMessage) $