[Mldonkey-commits] Changes to mldonkey/src/networks/donkey/donkeyProtoClient.ml

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyProtoClient.ml
diff -u mldonkey/src/networks/donkey/donkeyProtoClient.ml:1.29 
mldonkey/src/networks/donkey/donkeyProtoClient.ml:1.30
--- mldonkey/src/networks/donkey/donkeyProtoClient.ml:1.29      Sat Nov 19 
17:19:45 2005
+++ mldonkey/src/networks/donkey/donkeyProtoClient.ml   Mon Dec  5 18:37:34 2005
@@ -25,6 +25,7 @@
 open CommonTypes
 open LittleEndian
 open CommonGlobals
+open CommonOptions
 
 open DonkeyOptions
 open DonkeyTypes
@@ -1172,7 +1173,7 @@
 
     | 0x93 (* 147 *) ->
         if String.length s < 16 then begin
-          lprintf_nl "EmuleMultiPacketAnswer: incomplete request";
+          if !verbose then lprintf_nl "EmuleMultiPacketAnswer: incomplete 
request";
           raise Not_found
         end;
         let md4 = get_md4 s 1 in