Rename event field ewpf to io

diff --git a/libvideosite.pm b/libvideosite.pm
index 01fa7d9..7c77a3b 100644 (file)
--- a/libvideosite.pm
+++ b/libvideosite.pm
@@ -153,7 +153,7 @@ sub _io {
     #
     @text = map { defined($_)?$remote_api->{quote}->($_):'(undef)' } @text;
 
-    $outputstack[0]->{ewpf}->(sprintf($format, @text));
+    $outputstack[0]->{io}->(sprintf($format, @text));
 }
 
 #
@@ -1086,7 +1086,7 @@ sub register_api {
         $builtin_config_default = $a->{_config_default}->();
     }
 
-    @outputstack = ({ewpf => $remote_api->{'io'}, window => ""});
+    @outputstack = ({io => $remote_api->{'io'}, window => ""});
 
     return 1;
 }

diff --git a/videosite-dl.pl b/videosite-dl.pl
index 46c8b49..a907b84 100755 (executable)
--- a/videosite-dl.pl
+++ b/videosite-dl.pl
@@ -55,7 +55,7 @@ foreach (@ARGV) {
     printf("Handling %s...\n", $_);
     libvideosite::check_for_link({
         message => $_,
-        ewpf => sub { print @_, "\n" },
+        io => sub { print @_, "\n" },
         window => "",
     });
 }

diff --git a/videosite-irssi.pl b/videosite-irssi.pl
index 86e370d..043cc93 100644 (file)
--- a/videosite-irssi.pl
+++ b/videosite-irssi.pl
@@ -214,7 +214,7 @@ sub videosite_hook {
     my ($cmdline, $server, $witem) = @_;
     my %event = (
         message => $cmdline,
-        ewpf => sub { defined($witem)?$witem->print($_[0], MSGLEVEL_CLIENTCRAP):Irssi::print($_[0]) },
+        io => sub { defined($witem)?$witem->print($_[0], MSGLEVEL_CLIENTCRAP):Irssi::print($_[0]) },
         window => defined($witem)?$witem->{server}->{real_address} . "/" . $witem->{name}:"",
     );
 
@@ -230,7 +230,7 @@ sub message_hook {
     my $witem = $server->window_item_find($channel);
     my %event = (
         message => $msg,
-        ewpf => sub { defined($witem)?$witem->print($_[0], MSGLEVEL_CLIENTCRAP):Irssi::print($_[0]) },
+        io => sub { defined($witem)?$witem->print($_[0], MSGLEVEL_CLIENTCRAP):Irssi::print($_[0]) },
         window => defined($witem)?$witem->{server}->{real_address} . "/" . $witem->{name}:"",
     );
 

diff --git a/videosite-weechat.pl b/videosite-weechat.pl
index 9fc882b..5bddd1f 100644 (file)
--- a/videosite-weechat.pl
+++ b/videosite-weechat.pl
@@ -80,7 +80,7 @@ sub videosite_hook {
     my ($data, $buffer, $args) = @_;
     my %event = (
         message => $args,
-        ewpf => sub { weechat::print($buffer, @_) },
+        io => sub { weechat::print($buffer, @_) },
         window => $buffer,
     );
 
@@ -97,7 +97,7 @@ sub message_hook {
     my ($data, $buffer, $date, $tags, $displayed, $highlight, $prefix, $message ) = @_;
     my %event = (
         message => $message,
-        ewpf => sub { weechat::print($buffer, @_) },
+        io => sub { weechat::print($buffer, @_) },
         window => $buffer
     );
 

diff --git a/videosite-xchat2.pl b/videosite-xchat2.pl
index d71106d..fcb9ac3 100644 (file)
--- a/videosite-xchat2.pl
+++ b/videosite-xchat2.pl
@@ -55,7 +55,7 @@ sub videosite_hook {
 
     %event = (
         message => $msg->[1],
-        ewpf => sub {
+        io => sub {
             my $oldcxt = Xchat::get_context();
             Xchat::set_context($context);
             Xchat::print(@_);
@@ -80,7 +80,7 @@ sub message_hook {
 
     %event = (
         message => $msg->[1],
-        ewpf => sub {
+        io => sub {
             my $oldcxt = Xchat::get_context();
             Xchat::set_context($context);
             Xchat::print(@_);