From e4fd563f40bacce33712a84e0b275feb1881ea28 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sun, 13 Aug 2023 18:38:09 +0200
Subject: Network: send protocol version with announce

---
 src/Network.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Network.hs')

diff --git a/src/Network.hs b/src/Network.hs
index c5ba393..071a0b0 100644
--- a/src/Network.hs
+++ b/src/Network.hs
@@ -480,6 +480,8 @@ handlePacket identity secure peer chanSvc svcs (TransportHeader headers) prefs =
                     | otherwise -> addHeader $ Rejected dgst
                 | otherwise -> throwError $ "service ref without type"
 
+            _ -> return ()
+
     let logd = writeTQueue (serverErrorLog server)
     case res of
         Left err -> do
-- 
cgit v1.2.3