From a9bd0a3c70ebaf24e85954d92d50e4724dc5594a Mon Sep 17 00:00:00 2001
From: spiralvoice <spiralvoice>
Date: Sun, 7 Jul 2013 10:57:25 +0000
Subject: [PATCH] patch #8106

---
 distrib/ChangeLog                     | 1 +
 src/networks/donkey/donkeyProtoUdp.ml | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/distrib/ChangeLog b/distrib/ChangeLog
index dc6a209d..0525d272 100644
--- a/distrib/ChangeLog
+++ b/distrib/ChangeLog
@@ -15,6 +15,7 @@ ChangeLog
 =========
 
 2013/07/07:
+8106: EDK: do not dump unknown messages by default (ygrek)
 8105: Config: report line and position for syntax errors in config files (ygrek)
 8104: BT: suppress warning for peers6 entry in tracker response (ygrek)
 7954: Fix handling of full disc (jcea)
diff --git a/src/networks/donkey/donkeyProtoUdp.ml b/src/networks/donkey/donkeyProtoUdp.ml
index 95181bbc..7a7adaf4 100644
--- a/src/networks/donkey/donkeyProtoUdp.ml
+++ b/src/networks/donkey/donkeyProtoUdp.ml
@@ -25,6 +25,7 @@ open AnyEndian
 
 open CommonTypes
 open CommonGlobals
+open CommonOptions
 
 open DonkeyTypes
 open DonkeyMftp
@@ -499,8 +500,7 @@ let parse magic s =
     | _ -> raise Exit
   with
     e ->
-      lprintf "From UDP:\n";
-      dump s;
+      if !verbose_unknown_messages then begin lprintf "Unknown UDP request:\n"; dump s end;
       UnknownUdpReq (magic, s)
 
 let print t =
-- 
2.11.4.GIT