X-Git-Url: https://git.camperquake.de/gitweb.cgi?p=videosite.git;a=blobdiff_plain;f=videosite-weechat.pl;h=5bddd1fdf9b069f64d24a6aff6bba80670e8fa9e;hp=806067965397ceb5b4a9612a8b8d01f391a5d03d;hb=HEAD;hpb=b33c7bbd0343c8b436708173e0521c99fd9c1871 diff --git a/videosite-weechat.pl b/videosite-weechat.pl index 8060679..5bddd1f 100644 --- a/videosite-weechat.pl +++ b/videosite-weechat.pl @@ -6,6 +6,9 @@ use strict; use File::Spec; use Module::Load; use Data::Dumper; +use Carp; + +$SIG{ __DIE__ } = sub { Carp::confess( @_ ) }; weechat::register( "videosite", @@ -77,7 +80,8 @@ sub videosite_hook { my ($data, $buffer, $args) = @_; my %event = ( message => $args, - ewpf => sub { weechat::print($buffer, @_) }, + io => sub { weechat::print($buffer, @_) }, + window => $buffer, ); libvideosite::handle_command(\%event); @@ -93,7 +97,8 @@ 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 ); libvideosite::check_for_link(\%event); @@ -111,12 +116,12 @@ sub videosite_reset { config_get => \&config_get, config_set => \&config_set, config_has => \&config_has, - config_save => sub {}, + config_save => sub { 1 }, config_del => \&config_del, color => \&colorpair, module_path => sub { return File::Spec->catfile(weechat::info_get("weechat_dir", ""), 'perl') }, quote => sub { return $_ }, - _debug => sub { 1 }, + reload => sub { weechat::print("", "Please use \"/script reload ...\" to reload") }, })) { weechat::print("", sprintf("videosite API register failed: %s", $libvideosite::error)); return 0;