diff options
Diffstat (limited to 'src/plugins/scripts/perl')
| -rw-r--r-- | src/plugins/scripts/perl/weechat-perl-api.h | 5 | ||||
| -rw-r--r-- | src/plugins/scripts/perl/weechat-perl.c | 12 |
2 files changed, 11 insertions, 6 deletions
diff --git a/src/plugins/scripts/perl/weechat-perl-api.h b/src/plugins/scripts/perl/weechat-perl-api.h index fdfd1d695..5dbd0067d 100644 --- a/src/plugins/scripts/perl/weechat-perl-api.h +++ b/src/plugins/scripts/perl/weechat-perl-api.h @@ -20,6 +20,11 @@ #ifndef __WEECHAT_PERL_API_H #define __WEECHAT_PERL_API_H 1 +extern int weechat_perl_api_buffer_input_data_cb (void *data, + struct t_gui_buffer *buffer, + const char *input_data); +extern int weechat_perl_api_buffer_close_cb (void *data, + struct t_gui_buffer *buffer); extern void weechat_perl_api_init (pTHX); #endif /* weechat-perl.h */ diff --git a/src/plugins/scripts/perl/weechat-perl.c b/src/plugins/scripts/perl/weechat-perl.c index 5ef70fe8f..c49f445cd 100644 --- a/src/plugins/scripts/perl/weechat-perl.c +++ b/src/plugins/scripts/perl/weechat-perl.c @@ -772,11 +772,6 @@ weechat_plugin_init (struct t_weechat_plugin *plugin, int argc, char *argv[]) char **perl_args_local; char *perl_env[] = {}; #endif - - /* make C compiler happy */ - (void) argc; - (void) argv; - #ifdef PERL_SYS_INIT3 a = perl_args_count; perl_args_local = perl_args; @@ -806,13 +801,18 @@ weechat_plugin_init (struct t_weechat_plugin *plugin, int argc, char *argv[]) perl_quiet = 1; script_init (weechat_perl_plugin, + argc, + argv, + &perl_scripts, &weechat_perl_command_cb, &weechat_perl_completion_cb, &weechat_perl_infolist_cb, &weechat_perl_signal_debug_dump_cb, &weechat_perl_signal_buffer_closed_cb, &weechat_perl_signal_script_action_cb, - &weechat_perl_load_cb); + &weechat_perl_load_cb, + &weechat_perl_api_buffer_input_data_cb, + &weechat_perl_api_buffer_close_cb); perl_quiet = 0; script_display_short_list (weechat_perl_plugin, |