[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.60 
mldonkey/src/networks/bittorrent/bTInteractive.ml:1.61
--- mldonkey/src/networks/bittorrent/bTInteractive.ml:1.60      Thu Oct  6 
14:20:20 2005
+++ mldonkey/src/networks/bittorrent/bTInteractive.ml   Sun Oct 16 20:42:53 2005
@@ -731,7 +731,9 @@
     (Int64.to_string c.client_downloaded)
   (Int64.to_string c.client_uploaded)
   (if c.client_downloaded > c.client_uploaded then "-" else "+")
-  (if c.client_uploaded > Int64.zero then (Int64.to_float (Int64.div 
c.client_downloaded c.client_uploaded)) else (1.))
+  (if c.client_uploaded > Int64.zero then 
+     Int64.to_float (c.client_downloaded // c.client_uploaded) 
+   else 1.)
   ("BT");
   (Printf.bprintf buf (_b "%18sFile  : %s\n") "" info.GuiTypes.file_name)