pegasus/weechat
1
0
Fork 0
mirror of https://github.com/weechat/weechat.git synced 2026-06-29 14:26:39 +02:00
Code Activity

Restore buffer callbacks for scripts after /upgrade

Browse Source
This commit is contained in:
Sebastien Helleu
2009-04-16 14:25:44 +02:00
parent 771be1a316
commit 44003c2dae
13 changed files with 182 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/plugins/scripts/perl/weechat-perl-api.h
+5
View File
@@ -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 */
src/plugins/scripts/perl/weechat-perl.c
+6 -6
View File
@@ -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,