[Mldonkey-commits] Changes to mldonkey/src/networks/opennap/napigator.mll

[mldonkey-commits]

Index: mldonkey/src/networks/opennap/napigator.mll
diff -u mldonkey/src/networks/opennap/napigator.mll:1.3 
mldonkey/src/networks/opennap/napigator.mll:1.4
--- mldonkey/src/networks/opennap/napigator.mll:1.3     Wed Apr 20 16:17:53 2005
+++ mldonkey/src/networks/opennap/napigator.mll Tue Sep  6 11:25:00 2005
@@ -82,7 +82,7 @@
       | SPACE -> iter can_space can_space list
       | tok -> 
           let s = Buffer.contents buf in
-          Buffer.clear buf;
+          Buffer.reset buf;
           if String.length s = 0 then
             iter false false (tok :: list)
           else