[Mldonkey-commits] Changes to mldonkey/src/networks/fasttrack/fasttrackGlobals.ml

[mldonkey-commits]

Index: mldonkey/src/networks/fasttrack/fasttrackGlobals.ml
diff -u mldonkey/src/networks/fasttrack/fasttrackGlobals.ml:1.26 
mldonkey/src/networks/fasttrack/fasttrackGlobals.ml:1.27
--- mldonkey/src/networks/fasttrack/fasttrackGlobals.ml:1.26    Fri Sep  2 
23:48:54 2005
+++ mldonkey/src/networks/fasttrack/fasttrackGlobals.ml Sun Oct 16 20:42:54 2005
@@ -256,7 +256,7 @@
   let t = Unix32.create_rw file_temp in
   let file_chunk_size =
     max megabyte (
-      file_size // (max (Int64.of_int 5) (file_size // (megabytes 5)))
+      file_size // (max 5L (file_size // (megabytes 5)))
     )
   in
   let keywords = CommonUploads.words_of_filename file_name in