--- deliantra/server/ext/metaserver2.ext 2007/09/09 12:52:48 1.1 +++ deliantra/server/ext/metaserver2.ext 2007/09/10 08:02:14 1.3 @@ -11,7 +11,7 @@ our $UPDATE_METASERVER2 = Event->timer ( reentrant => 0, - after => 0, + after => 37, interval => 299, # crossfire itself uses 60something as interval hard => 1, data => cf::WF_AUTOCANCEL, @@ -42,8 +42,6 @@ map "$_=" . (URI::Escape::uri_escape_utf8 $form{$_}), keys %form; - $content .= "\015\012"; # for good form - # this is a bit hacky, but hey, invoking LWP on something so trivial feels like a sin for my $url (@{ $cf::CFG{metaserver2_urls} || [] }) { @@ -75,10 +73,7 @@ unless ($response =~ /^HTTP\/[0-9.]+\s+200\s+/) { warn "$url: $response\n"; } - warn $response; } - -# syswrite $socket, $pkt; }, );