/[mldonkey]/mldonkey/src/networks/bittorrent/bTInteractive.ml
ViewVC logotype

Diff of /mldonkey/src/networks/bittorrent/bTInteractive.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.63 by spiralvoice, Mon Nov 7 20:11:42 2005 UTC revision 1.64 by spiralvoice, Sat Nov 12 11:20:20 2005 UTC
# Line 332  let op_file_print_sources_html file buf Line 332  let op_file_print_sources_html file buf
332                  (match c.client_bitmap with                  (match c.client_bitmap with
333                      None -> ()                      None -> ()
334                    | Some bitmap ->                    | Some bitmap ->
335                        String.iter (fun s -> if s = '1' then incr fc) bitmap );                        Bitv.iter (fun s -> if s then incr fc) bitmap);
336                  (Printf.sprintf "%d" !fc) ) ) ];                  (Printf.sprintf "%d" !fc) ) ) ];
337    
338            Printf.bprintf buf "\\</tr\\>";            Printf.bprintf buf "\\</tr\\>";

Legend:
Removed from v.1.63  
changed lines
  Added in v.1.64

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26