[Mldonkey-commits] Changes to mldonkey/src/networks/fileTP/fileTPProtocol.ml

[mldonkey-commits]

Index: mldonkey/src/networks/fileTP/fileTPProtocol.ml
diff -u mldonkey/src/networks/fileTP/fileTPProtocol.ml:1.4 
mldonkey/src/networks/fileTP/fileTPProtocol.ml:1.5
--- mldonkey/src/networks/fileTP/fileTPProtocol.ml:1.4  Mon May  3 08:22:25 2004
+++ mldonkey/src/networks/fileTP/fileTPProtocol.ml      Thu Jul  7 00:25:46 2005
@@ -153,7 +153,7 @@
 
 let parse_range range =
   let x, y, z = parse_range range in
-  lprintf "Range parsed: %Ld-%s/%s" x
+  if !verbose then lprintf "Range parsed: %Ld-%s/%s" x
     (match y with None -> "" | Some y -> Int64.to_string y)    
   (match z with None -> "*" | Some y -> Int64.to_string y);
   x, y, z