[nexuiz-commits] r7894 - trunk/server/rcon2irc

DONOTREPLY at icculus.org DONOTREPLY at icculus.org
Thu Sep 24 10:41:14 EDT 2009


Author: div0
Date: 2009-09-24 10:41:13 -0400 (Thu, 24 Sep 2009)
New Revision: 7894

Modified:
   trunk/server/rcon2irc/rbiserver.pl
   trunk/server/rcon2irc/rcon2irc.pl
Log:
more rcon2irc fun


Modified: trunk/server/rcon2irc/rbiserver.pl
===================================================================
--- trunk/server/rcon2irc/rbiserver.pl	2009-09-24 13:18:43 UTC (rev 7893)
+++ trunk/server/rcon2irc/rbiserver.pl	2009-09-24 14:41:13 UTC (rev 7894)
@@ -93,12 +93,19 @@
 	out irc => 0, "PRIVMSG $config{irc_channel} :\001ACTION thinks $nick refuses to tell us which file is modified\001";
 	return 0;
 } ],
+[ dp => q{pure: \*DETAIL_CVAR (.*) (\S+) (.*)$} => sub {
+	my ($nick, $cvar, $value) = @_;
+	$nick = color_dp2irc $nick;
+	out irc => 0, "PRIVMSG $config{irc_channel} :\001ACTION thinks $nick has changed $cvar to $value\001";
+	return 0;
+} ],
 [ dp => q{:recordset:(\d+):.*} => sub {
 	my ($id) = @_;
 	my $ip = $store{"playerip_byid_$id"};
 	my $slot = $store{"playerslot_byid_$id"};
 	my $name = $config{irc_nick};
 	$name =~ s/Nex//; # haggerNexCTF -> haggerCTF
+	$name =~ s/^rm/hagger/g; # rmRace -> haggerRace
 	my $map = $store{map};
 	$map =~ s/^[a-z]*_//;
 	$ip =~ s/\./-/g;

Modified: trunk/server/rcon2irc/rcon2irc.pl
===================================================================
--- trunk/server/rcon2irc/rcon2irc.pl	2009-09-24 13:18:43 UTC (rev 7893)
+++ trunk/server/rcon2irc/rcon2irc.pl	2009-09-24 14:41:13 UTC (rev 7894)
@@ -201,10 +201,10 @@
 			my $oldcolor = $color;
 			$color = $color_dp2irc_table[$data];
 
-			$color == $oldcolor        ? '' :
-			$color < 0                 ? "\017" :
-			index '0123456789,', $next ? "\003$color\002\002" :
-			                             "\003$color";
+			$color == $oldcolor               ? '' :
+			$color < 0                        ? "\017" :
+			(index '0123456789,', $next) >= 0 ? "\003$color\002\002" :
+			                                    "\003$color";
 		} :
 			die "Invalid type";
 	}



More information about the nexuiz-commits mailing list