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

oops

Browse source
This commit is contained in:
Joey Hess 2024-07-26 13:54:37 -04:00
parent ad025b8e5e
commit 212e5d04e6
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
P2P/Protocol.hs
View file

@ -377,7 +377,7 @@ negotiateProtocolVersion preferredversion = do
case r of case r of
Just (VERSION v) -> net $ setProtocolVersion v Just (VERSION v) -> net $ setProtocolVersion v
-- Old server doesn't know about the VERSION command. -- Old server doesn't know about the VERSION command.
Just (ERROR _) -> net $ setProtocolVersion 0 Just (ERROR _) -> net $ setProtocolVersion (ProtocolVersion 0)
_ -> net $ sendMessage (ERROR "expected VERSION") _ -> net $ sendMessage (ERROR "expected VERSION")
sendBypass :: Bypass -> Proto () sendBypass :: Bypass -> Proto ()