From 1ac9b2e232594700922c5e99541f04ab0e4dee69 Mon Sep 17 00:00:00 2001 From: div0 Date: Sat, 7 Feb 2009 10:43:23 +0000 Subject: [PATCH] fix neg ascores git-svn-id: svn://svn.icculus.org/nexuiz/trunk@5796 f962a42d-fe04-0410-a3ab-8c8b0445ebaa --- server/rcon2irc/rcon2irc.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/server/rcon2irc/rcon2irc.pl b/server/rcon2irc/rcon2irc.pl index c54647208..ddeea8959 100755 --- a/server/rcon2irc/rcon2irc.pl +++ b/server/rcon2irc/rcon2irc.pl @@ -1371,7 +1371,7 @@ sub cond($) } ], # scores: Nexuiz server -> IRC channel, new format - [ dp => q{:player:see-labels:(\d+)[-0-9,]*:(\d+):(\d+):(\d+):(.*)} => sub { + [ dp => q{:player:see-labels:(-?\d+)[-0-9,]*:(\d+):(\d+):(\d+):(.*)} => sub { my ($frags, $time, $team, $id, $name) = @_; return if not exists $store{scores}; push @{$store{scores}{players}}, [$frags, $team, $name]; @@ -1379,7 +1379,7 @@ sub cond($) } ], # scores: Nexuiz server -> IRC channel (CTF), new format - [ dp => q{:teamscores:see-labels:(\d+)[-0-9,]*:(\d+)} => sub { + [ dp => q{:teamscores:see-labels:(-?\d+)[-0-9,]*:(\d+)} => sub { my ($frags, $team) = @_; return if not exists $store{scores}; $store{scores}{teams}{$team} = $frags; -- 2.39.2