[Mldonkey-commits] Changes to mldonkey/src/networks/donkey/donkeyInteractive.ml

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyInteractive.ml
diff -u mldonkey/src/networks/donkey/donkeyInteractive.ml:1.60 
mldonkey/src/networks/donkey/donkeyInteractive.ml:1.61
--- mldonkey/src/networks/donkey/donkeyInteractive.ml:1.60      Tue Sep 13 
09:54:47 2005
+++ mldonkey/src/networks/donkey/donkeyInteractive.ml   Sat Sep 17 17:50:38 2005
@@ -53,6 +53,7 @@
 open CommonGlobals
 open CommonOptions
 open DonkeyStats
+open DonkeyUdp
 
 (* prints a new logline with date, module and starts newline *)
 let lprintf_nl () =
@@ -266,7 +267,7 @@
   (try
       let servers = Hashtbl.find_all udp_servers_replies file.file_md4 in
       List.iter (fun s ->
-          udp_server_send s (DonkeyProtoUdp.QueryLocationUdpReq 
[file.file_md4])
+          udp_server_send_query_location s [(file.file_md4,(file_size file))]
       ) servers
     with _ -> ());