Mercurial > pidgin
comparison plugins/perl/common/Gaim.xs @ 6567:6e25e1e08ffb
[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 | 28b38803d0bb |
children | 33486b749aa9 |
comparison
equal
deleted
inserted
replaced
6566:f6c2a7b5afa7 | 6567:6e25e1e08ffb |
---|---|
12 SV *data | 12 SV *data |
13 CODE: | 13 CODE: |
14 gaim_perl_timeout_add(plugin, seconds, func, data); | 14 gaim_perl_timeout_add(plugin, seconds, func, data); |
15 | 15 |
16 void | 16 void |
17 signal_connect(instance, signal, plugin, func, data) | 17 signal_connect(instance, signal, plugin, callback, data) |
18 void *instance | 18 void *instance |
19 const char *signal | 19 const char *signal |
20 Gaim::Plugin plugin | 20 Gaim::Plugin plugin |
21 const char *func | 21 SV *callback |
22 SV *data | 22 SV *data |
23 CODE: | 23 CODE: |
24 gaim_perl_signal_connect(plugin, instance, signal, func, data); | 24 gaim_perl_signal_connect(plugin, instance, signal, callback, data); |
25 | 25 |
26 void | 26 void |
27 signal_disconnect(instance, signal, plugin, func) | 27 signal_disconnect(instance, signal, plugin) |
28 void *instance | 28 void *instance |
29 const char *signal | 29 const char *signal |
30 Gaim::Plugin plugin | 30 Gaim::Plugin plugin |
31 const char *func | |
32 CODE: | 31 CODE: |
33 gaim_perl_signal_disconnect(plugin, instance, signal, func); | 32 gaim_perl_signal_disconnect(plugin, instance, signal); |
34 | 33 |
35 void | 34 void |
36 debug(level, category, string) | 35 debug(level, category, string) |
37 const char *level | 36 const char *level |
38 const char *category | 37 const char *category |