Add window identifier to event structure

diff --git a/videosite-dl.pl b/videosite-dl.pl
index 769ab43..1225b92 100755 (executable)
--- a/videosite-dl.pl
+++ b/videosite-dl.pl
@@ -58,5 +58,6 @@ foreach (@ARGV) {
     libvideosite::check_for_link({
         message => $_,
         ewpf => sub { print @_, "\n" },
+        window => "",
     });
 }

diff --git a/videosite-irssi.pl b/videosite-irssi.pl
index 30d462a..1afd31a 100644 (file)
--- a/videosite-irssi.pl
+++ b/videosite-irssi.pl
@@ -212,6 +212,7 @@ sub videosite_hook {
     my %event = (
         message => $cmdline,
         ewpf => sub { defined($witem)?$witem->print($_[0]):Irssi::print($_[0]) },
+        window => defined($witem)?$witem->{server}->{real_address} . "/" . $witem->{name}:"",
     );
 
     libvideosite::handle_command(\%event);
@@ -223,10 +224,11 @@ sub videosite_hook {
 #
 sub message_hook {
     my ($server, $msg, $nick, $userhost, $channel) = @_;
-    my $evitem = $server->window_item_find($channel);
+    my $witem = $server->window_item_find($channel);
     my %event = (
         message => $msg,
-        ewpf => sub { defined($evitem)?$evitem->print($_[0]):Irssi::print($_[0]) },
+        ewpf => sub { defined($witem)?$witem->print($_[0]):Irssi::print($_[0]) },
+        window => defined($witem)?$witem->{server}->{real_address} . "/" . $witem->{name}:"",
     );
 
     libvideosite::check_for_link(\%event);

diff --git a/videosite-weechat.pl b/videosite-weechat.pl
index e093b30..4693df4 100644 (file)
--- a/videosite-weechat.pl
+++ b/videosite-weechat.pl
@@ -78,6 +78,7 @@ sub videosite_hook {
     my %event = (
         message => $args,
         ewpf => sub { weechat::print($buffer, @_) },
+        window => $buffer,
     );
 
     libvideosite::handle_command(\%event);
@@ -94,6 +95,7 @@ sub message_hook {
     my %event = (
         message => $message,
         ewpf => sub { weechat::print($buffer, @_) },
+        window => $buffer
     );
 
     libvideosite::check_for_link(\%event);