--- deliantra/server/ext/metaserver.ext 2007/01/24 13:59:28 1.3 +++ deliantra/server/ext/metaserver.ext 2007/04/16 06:23:41 1.4 @@ -7,6 +7,10 @@ $cf::CFG{metaserver_comment} or return; +our $VERSION = cf::VERSION; +our $PREFIX = ""; +our $SUFFIX = "ng"; + our $UPDATE_METASERVER = Event->timer ( reentrant => 0, after => 5, @@ -29,7 +33,7 @@ my $pkt = sprintf "%s|%d|%s|%s|%d|%d|%d", $cf::CFG{metaserver_servername}, $num_players, - cf::VERSION, + "$PREFIX$VERSION$SUFFIX", $cf::CFG{metaserver_comment}, 0, # ibytes 0, # obytes