Roxen.git/
server/
base_server/
roxen.pike
Branch:
Tag:
Non-build tags
All tags
No tags
1997-11-27
1997-11-27 19:56:45 by Henrik Grubbström (Grubba) <grubba@grubba.org>
47f2cffd59f61d1bdfd17b46284797b7b5c14340 (
13
lines) (+
10
/-
3
)
[
Show
|
Annotate
]
Branch:
5.2
Bumped version to Roxen 1.2 beta 1!
Rev: server/base_server/roxen.pike:1.151
1:
-
constant cvs_version = "$Id: roxen.pike,v 1.
150
1997/11/
26
22
:
26
:
07
grubba Exp $";
+
constant cvs_version = "$Id: roxen.pike,v 1.
151
1997/11/
27
19
:
56
:
45
grubba Exp $";
#define IN_ROXEN #include <roxen.h> #include <config.h>
22:
// This is the real Roxen version. It should be changed before each // release
-
constant real_version = "Roxen Challenger/1.
2alpha15
";
+
constant real_version = "Roxen Challenger/1.
2beta1
";
#if _DEBUG_HTTP_OBJECTS mapping httpobjects = ([]);
575:
#endif _new_supports = ({}); port->set_id(port);
+
string v = version();
+
if (v != real_version) {
+
v = v + " (" + real_version + ")";
+
}
port->write("GET /supports HTTP/1.0\r\n"
-
"User-Agent: " +
real_version
+ "\r\n"
+
"User-Agent: " +
v
+ "\r\n"
+
"Host: www.roxen.com:80\r\n"
+
"Pragma: no-cache\r\n"
"\r\n"); port->set_nonblocking(got_data_from_roxen_com, got_data_from_roxen_com,