[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonWeb.ml

[mldonkey-commits]

Index: mldonkey/src/daemon/common/commonWeb.ml
diff -u mldonkey/src/daemon/common/commonWeb.ml:1.20 
mldonkey/src/daemon/common/commonWeb.ml:1.21
--- mldonkey/src/daemon/common/commonWeb.ml:1.20        Thu Sep  1 00:04:12 2005
+++ mldonkey/src/daemon/common/commonWeb.ml     Tue Sep  6 11:24:59 2005
@@ -141,12 +141,12 @@
   let infos =
     List.map (fun (n,f) ->
         n,
-        ( Buffer.clear buf;
+        ( Buffer.reset buf;
           f buf;
           Buffer.contents buf)
     ) !redirector_infos in
 
-  Buffer.clear buf;
+  Buffer.reset buf;
   buf_int8 buf 212; (* udp_magic *)
   buf_int8 buf 2;   (* type of data sent *)
   let ip = client_ip None in