/[mldonkey]/mldonkey/src/networks/direct_connect/dcOptions.ml
ViewVC logotype

Diff of /mldonkey/src/networks/direct_connect/dcOptions.ml

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

revision 1.6 by spiralvoice, Tue May 17 13:18:05 2005 UTC revision 1.7 by spiralvoice, Sat Nov 5 16:23:40 2005 UTC
# Line 86  let client_speed = define_option directc Line 86  let client_speed = define_option directc
86  let client_keyinfo = define_option directconnect_section  let client_keyinfo = define_option directconnect_section
87      ["client_keyinfo"] "The key info sent in the handshake message"      ["client_keyinfo"] "The key info sent in the handshake message"
88      string_option "Pk=mldc"      string_option "Pk=mldc"
89      
90    let options_version = define_option directconnect_section ["options_version"]
91        "(internal option)"
92        int_option 0
93    
94  let shortname o =  let shortname o =
95    Printf.sprintf "DC-%s" (shortname o)    Printf.sprintf "DC-%s" (shortname o)
# Line 109  let gui_dc_options_panel = Line 112  let gui_dc_options_panel =
112      ("Client Speed", shortname client_speed, "T");      ("Client Speed", shortname client_speed, "T");
113      ("Shared Offset", shortname shared_offset, "T");      ("Shared Offset", shortname shared_offset, "T");
114    ]    ]
   
 let client_options_version = define_option directconnect_section  
     ["client_options_version"] "To automatically update your options"  
     int_option 0  

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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