Bug 538396 - Net::IRC 0.76 and higher crash (strict refs) in Net::IRC::Event.pm on line 73. rs=Wolf.

git-svn-id: svn://10.0.0.236/trunk@261768 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
psychoticwolf%carolina.rr.com
2011-01-18 03:19:04 +00:00
parent 735795b7a9
commit 81f6c22576

View File

@@ -302,12 +302,11 @@ my %authenticatedUsers; # hash of user@hostname=>users who have authenticated
sub setEventArgs {
my $event = shift;
if ($Net::IRC::VERSION == 0.75) {
# curses. This version of Net::IRC is broken. Work around
# it here.
return $event->args(\@_);
} else {
#Net::IRC 0.75 and higher requires array refs for Event::Args.
if ($Net::IRC::VERSION < 0.75) {
return $event->args(@_);
} else {
return $event->args(\@_);
}
}