Mercurial > pidgin
comparison plugins/perl/perl-handlers.h @ 12988:b457aa723bab
[gaim-migrate @ 15341]
Perl plugins can now have more than one plugin action. This isn't exactly the
nicest way to have done this, as it requires a "global" plugin_actions hash to
work, but I couldn't get the cleaner way to work and this is better than
nothing.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Sun, 22 Jan 2006 10:29:34 +0000 |
parents | e1603fd610fa |
children | 60b863ecd89b |
comparison
equal
deleted
inserted
replaced
12987:750968cab201 | 12988:b457aa723bab |
---|---|
5 #include "plugin.h" | 5 #include "plugin.h" |
6 #include "prefs.h" | 6 #include "prefs.h" |
7 #include "pluginpref.h" | 7 #include "pluginpref.h" |
8 #include "gtkplugin.h" | 8 #include "gtkplugin.h" |
9 #include "gtkutils.h" | 9 #include "gtkutils.h" |
10 | |
11 /* TODO: Find a better way to access the perl names from the plugin prober */ | |
12 /* and store them for gaim_perl_plugin_action_* functions. */ | |
13 char * gaim_perl_plugin_action_callback_sub; | |
14 char * gaim_perl_plugin_action_label; | |
15 | 10 |
16 typedef struct | 11 typedef struct |
17 { | 12 { |
18 GaimCmdId id; | 13 GaimCmdId id; |
19 SV *callback; | 14 SV *callback; |
41 GaimPlugin *plugin; | 36 GaimPlugin *plugin; |
42 | 37 |
43 } GaimPerlSignalHandler; | 38 } GaimPerlSignalHandler; |
44 | 39 |
45 void gaim_perl_plugin_action_cb(GaimPluginAction * gpa); | 40 void gaim_perl_plugin_action_cb(GaimPluginAction * gpa); |
46 GList *gaim_perl_plugin_action(GaimPlugin *plugin, gpointer context); | 41 GList *gaim_perl_plugin_actions(GaimPlugin *plugin, gpointer context); |
47 | 42 |
48 GaimPluginPrefFrame *gaim_perl_get_plugin_frame(GaimPlugin *plugin); | 43 GaimPluginPrefFrame *gaim_perl_get_plugin_frame(GaimPlugin *plugin); |
49 | 44 |
50 GtkWidget *gaim_perl_gtk_get_plugin_frame(GaimPlugin *plugin); | 45 GtkWidget *gaim_perl_gtk_get_plugin_frame(GaimPlugin *plugin); |
51 | 46 |