19f6c8541c
OPALSTAT uses HTTP/1.1 and sets the UserAgent to SICS to avoid re-directs. It also sends the SICS version and revision numbers in the UserAgent string.
14 lines
290 B
Tcl
14 lines
290 B
Tcl
fileeval $cfPath(source)/sct_reactor_status.tcl
|
|
|
|
if {[SplitReply [opal_simulation]]=="false"} {
|
|
MakeAsyncQueue aqreactor OPALSTAT neutron.ansto.gov.au 80
|
|
aqreactor timeout 2000
|
|
}
|
|
add_reactor_status source aqadapter aqreactor
|
|
|
|
namespace eval ::source {
|
|
proc isc_initialize {} {
|
|
}
|
|
}
|
|
|