From: Joey Hess <joey@kitenet.net>
Date: Tue, 2 Apr 2013 19:18:03 +0000 (-0400)
Subject: squelch protocol error on shutdown
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~4599
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=0ba205f12506aae107d111d509a0a7e3a23a6a5e;p=git-annex.git

squelch protocol error on shutdown
---

diff --git a/Command/TransferKeys.hs b/Command/TransferKeys.hs
index 5fc993dc10..458fb31c10 100644
--- a/Command/TransferKeys.hs
+++ b/Command/TransferKeys.hs
@@ -84,8 +84,9 @@ runRequests readh writeh a = do
 						(TransferRequest direction remote key file)
 			_ -> sendresult False
 		go rest
-	go [] = return ()
-	go _ = error "transferkeys protocol error"
+	go [] = noop
+	go [""] = noop
+	go v = error $ "transferkeys protocol error: " ++ show v
 
 	readrequests = liftIO $ split fieldSep <$> hGetContents readh
 	sendresult b = liftIO $ do