[Mldonkey-commits] mldonkey/src/networks/donkey donkeyGlobals.ml

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       06/09/05 21:25:55

Modified files:
        src/networks/donkey: donkeyGlobals.ml 

Log message:
        patch #5370

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/networks/donkey/donkeyGlobals.ml?cvsroot=mldonkey&r1=1.94&r2=1.95

Patches:
Index: donkeyGlobals.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/networks/donkey/donkeyGlobals.ml,v
retrieving revision 1.94
retrieving revision 1.95
diff -u -b -r1.94 -r1.95
--- donkeyGlobals.ml    5 Sep 2006 21:09:56 -0000       1.94
+++ donkeyGlobals.ml    5 Sep 2006 21:25:55 -0000       1.95
@@ -603,13 +603,45 @@
 let create_client key =
   let module D = DonkeyProtoClient in
   let s = DonkeySources.find_source_by_uid key in
-  let rec c = { dummy_client with
+  let rec c = {
       client_client = client_impl;
       client_kind = key;
+      client_upload = None;
       client_source = s;
+      client_ip = Ip.null;
+      client_md4 = Md4.null;
+      client_download = None;
+      client_file_queue = [];
+      client_tags = [];
+      client_name = "";
+      client_last_asked_file = dummy_file;
+      client_all_files = None;
+      client_rating = 0;
+      client_brand = Brand_unknown;
+      client_brand_mod = Brand_mod_unknown;
+      client_checked = false;
+      client_connected = false;
+      client_downloaded = Int64.zero;
+      client_uploaded = Int64.zero;
+      client_banned = false;
+      client_score = 0;
+      client_next_queue = 0;
+      client_rank = 0;
+      client_connect_time = 0;
+      client_requests_received = 0;
+      client_requests_sent = 0;
+      client_indirect_address = None;
+      client_slot = SlotNotAsked;
       client_debug = Intset.mem s.DonkeySources.source_num !debug_clients;
-      } and
-    client_impl = {
+      client_pending_messages = [];
+      client_emule_proto = emule_proto ();
+      client_comp = None;
+      client_connection_time = 0;
+      client_req_challenge = Int64.zero;
+      client_sent_challenge = Int64.zero;
+      client_public_key = None;
+      client_sui_verified = None;
+      } and    client_impl = {
       dummy_client_impl with
       impl_client_val = c;
       impl_client_ops = client_ops;