From 5493280845acf44bba4182f54c1ec3f155e7ac39 Mon Sep 17 00:00:00 2001
From: Ralf Ertzinger <ralf@skytale.net>
Date: Tue, 30 Apr 2013 18:36:33 +0200
Subject: [PATCH] videosite-irssi: Call Irssi::print with only one argument

---
 videosite-irssi.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/videosite-irssi.pl b/videosite-irssi.pl
index 50658f4..55d7b20 100644
--- a/videosite-irssi.pl
+++ b/videosite-irssi.pl
@@ -175,7 +175,7 @@ sub videosite_hook {
     my ($cmdline, $server, $witem) = @_;
     my %event = (
         message => $cmdline,
-        ewpf => sub { defined($evitem)?$evitem->print(@_):Irssi::print(@_) },
+        ewpf => sub { defined($witem)?$witem->print($_[0]):Irssi::print($_[0]) },
     );
 
     libvideosite::handle_command(\%event);
@@ -190,7 +190,7 @@ sub message_hook {
     my $evitem = $server->window_item_find($channel);
     my %event = (
         message => $msg,
-        ewpf => sub { defined($evitem)?$evitem->print(@_):Irssi::print(@_) },
+        ewpf => sub { defined($evitem)?$evitem->print($_[0]):Irssi::print($_[0]) },
     );
 
     libvideosite::check_for_link(\%event);
@@ -198,7 +198,7 @@ sub message_hook {
 
 sub videosite_reset {
     unless(libvideosite::register_api({
-        io => sub { Irssi::print(@_) },
+        io => sub { Irssi::print($_[0]) },
         config_init => \&config_init,
         config_get =>  \&config_get,
         config_set => \&config_set,
-- 
1.8.3.1