From 210be3e61efa85158521864cf70593fe14bafe46 Mon Sep 17 00:00:00 2001
From: Elijah Perrault <elijah@starcoder.info>
Date: Tue, 8 Feb 2011 13:25:52 -0700
Subject: [PATCH] Use regex here.

---
 src/API/Std.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/API/Std.pm b/src/API/Std.pm
index d51ba15..06ec0c3 100644
--- a/src/API/Std.pm
+++ b/src/API/Std.pm
@@ -375,7 +375,7 @@ sub match_user
 				}
 			}
             elsif ($uhk eq 'chanstatus' and defined $ulhp{'net'}) {
-                my ($ccst, $ccnm) = split ':', ($ulhp{$uhk})[0][0];
+                my ($ccst, $ccnm) = split m/[:]/, ($ulhp{$uhk})[0][0];
                 my $svr = $ulhp{net}[0];
                 if (defined $Auto::SOCKET{$svr}) {
                     foreach my $bcj (@{ $Parser::IRC::botchans{$svr} }) {