# HG changeset patch # User Jordi GutiƩrrez Hermoso # Date 1316982176 18000 # Node ID 15b72cc602b4df37f6581d360013c235f063a908 # Parent 77444d749997f216967f707362df81bc62837a9f Create arrays from arrayrefs correctly diff --git a/teh-lol.pl b/teh-lol.pl --- a/teh-lol.pl +++ b/teh-lol.pl @@ -28,7 +28,7 @@ my %timestamp; sub update_tstamp{ - my @xchat_args = $_[0]; + my @xchat_args = @{$_[0]}; my $msg = $xchat_args[1]; if( $_[0][1] eq "lol" ){ my $chan = Xchat::get_info("channel"); @@ -48,7 +48,7 @@ } sub check_lol { - my @xchat_args = $_[0]; + my @xchat_args = @{$_[0]}; my $chatter = $xchat_args[0]; my $msg = $xchat_args[1];