Mercurial > pidgin.yaz

comparison plugins/perl/perl-handlers.h @ 6567:6e25e1e08ffb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 7089] Perl signal callbacks just got more spiffy. You can now embed a sub inside of a callback instead of linking to the function. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Fri, 22 Aug 2003 04:09:06 +0000
parents f1736493aebb
children 33486b749aa9
comparison
equal deleted inserted replaced
6566:f6c2a7b5afa7 6567:6e25e1e08ffb
13 } GaimPerlTimeoutHandler; 13 } GaimPerlTimeoutHandler;
14 14
15 typedef struct 15 typedef struct
16 { 16 {
17 char *signal; 17 char *signal;
18 char *func; 18 SV *callback;
19 void *data; 19 SV *data;
20 void *instance; 20 void *instance;
21 GaimPlugin *plugin; 21 GaimPlugin *plugin;
22 22
23 } GaimPerlSignalHandler; 23 } GaimPerlSignalHandler;
24 24
27 void *args); 27 void *args);
28 void gaim_perl_timeout_clear_for_plugin(GaimPlugin *plugin); 28 void gaim_perl_timeout_clear_for_plugin(GaimPlugin *plugin);
29 void gaim_perl_timeout_clear(void); 29 void gaim_perl_timeout_clear(void);
30 30
31 void gaim_perl_signal_connect(GaimPlugin *plugin, void *instance, 31 void gaim_perl_signal_connect(GaimPlugin *plugin, void *instance,
32 const char *signal, const char *func, 32 const char *signal, SV *callback,
33 void *data); 33 SV *data);
34 void gaim_perl_signal_disconnect(GaimPlugin *plugin, void *instance, 34 void gaim_perl_signal_disconnect(GaimPlugin *plugin, void *instance,
35 const char *signal, const char *func); 35 const char *signal);
36 void gaim_perl_signal_clear_for_plugin(GaimPlugin *plugin); 36 void gaim_perl_signal_clear_for_plugin(GaimPlugin *plugin);
37 void gaim_perl_signal_clear(void); 37 void gaim_perl_signal_clear(void);
38 38
39 #endif /* _GAIM_PERL_HANDLERS_H_ */ 39 #endif /* _GAIM_PERL_HANDLERS_H_ */