Roxen.git/
server/
base_server/
roxen.pike
Branch:
Tag:
Non-build tags
All tags
No tags
1997-11-26
1997-11-26 22:26:07 by Henrik Grubbström (Grubba) <grubba@grubba.org>
99864e669c76017d2aa3e4ad32445b351fbca311 (
7
lines) (+
5
/-
2
)
[
Show
|
Annotate
]
Branch:
5.2
Now sets User-Agent when getting supports.
Rev: server/base_server/roxen.pike:1.150
1:
-
constant cvs_version = "$Id: roxen.pike,v 1.
149
1997/11/26 22:
08
:
55
grubba Exp $";
+
constant cvs_version = "$Id: roxen.pike,v 1.
150
1997/11/26 22:
26
:
07
grubba Exp $";
#define IN_ROXEN #include <roxen.h> #include <config.h>
575:
#endif _new_supports = ({}); port->set_id(port);
-
port->write("GET /
supports\n
");
+
port->write("GET /
supports HTTP/1.0\r\n
"
+
"User-Agent: " + real_version + "\r\n"
+
"\r\n"
);
port->set_nonblocking(got_data_from_roxen_com, got_data_from_roxen_com, done_with_roxen_com);