67 |
H.req_url = Url.of_string url; |
H.req_url = Url.of_string url; |
68 |
H.req_proxy = !CommonOptions.http_proxy; |
H.req_proxy = !CommonOptions.http_proxy; |
69 |
H.req_user_agent = |
H.req_user_agent = |
70 |
Printf.sprintf "MLdonkey/%s" Autoconf.current_version; |
Printf.sprintf "MLDonkey/%s" Autoconf.current_version; |
71 |
} in |
} in |
72 |
if !verbose then |
if !verbose then |
73 |
lprintf "Connecting Gnutella %s\n" url; |
lprintf "Connecting Gnutella %s\n" url; |
111 |
H.req_url = Url.of_string url; |
H.req_url = Url.of_string url; |
112 |
H.req_proxy = !CommonOptions.http_proxy; |
H.req_proxy = !CommonOptions.http_proxy; |
113 |
H.req_user_agent = |
H.req_user_agent = |
114 |
Printf.sprintf "MLdonkey/%s" Autoconf.current_version; |
Printf.sprintf "MLDonkey/%s" Autoconf.current_version; |
115 |
} in |
} in |
116 |
if !verbose then |
if !verbose then |
117 |
lprintf "Connecting Gnutella %s\n" url; |
lprintf "Connecting Gnutella %s\n" url; |