[Mldonkey-commits] Changes to mldonkey/src/networks/bittorrent/bTInteractive.ml

[mldonkey-commits]

Index: mldonkey/src/networks/bittorrent/bTInteractive.ml
diff -u mldonkey/src/networks/bittorrent/bTInteractive.ml:1.63 
mldonkey/src/networks/bittorrent/bTInteractive.ml:1.64
--- mldonkey/src/networks/bittorrent/bTInteractive.ml:1.63      Mon Nov  7 
20:11:42 2005
+++ mldonkey/src/networks/bittorrent/bTInteractive.ml   Sat Nov 12 11:20:20 2005
@@ -332,7 +332,7 @@
                 (match c.client_bitmap with
                     None -> ()
                   | Some bitmap ->
-                      String.iter (fun s -> if s = '1' then incr fc) bitmap );
+                      Bitv.iter (fun s -> if s then incr fc) bitmap);
                 (Printf.sprintf "%d" !fc) ) ) ];
 
           Printf.bprintf buf "\\</tr\\>";