Mercurial > pidgin.yaz
comparison plugins/perl/perl-handlers.c @ 12871:2422097a7a5e
[gaim-migrate @ 15223]
Whitespace in some .c and .h files that I hadn't had a reason to touch before,
this is it's own commit mostly to show how easy it was to get perl plugins to
support individual plugin pref frames, as opposed to just one for all the
loaded perl plugins.
And some whitespace that I missed in Conversation.xs.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Sat, 14 Jan 2006 07:12:46 +0000 |
parents | 86d67bd4ef24 |
children | 59ff3e1c874e |
comparison
equal
deleted
inserted
replaced
12870:a9cd674078b1 | 12871:2422097a7a5e |
---|---|
129 gaim_perl_get_plugin_frame(GaimPlugin *plugin) | 129 gaim_perl_get_plugin_frame(GaimPlugin *plugin) |
130 { | 130 { |
131 /* Sets up the Perl Stack for our call back into the script to run the | 131 /* Sets up the Perl Stack for our call back into the script to run the |
132 * plugin_pref... sub */ | 132 * plugin_pref... sub */ |
133 GaimPluginPrefFrame *ret_frame; | 133 GaimPluginPrefFrame *ret_frame; |
134 int count; | |
134 dSP; | 135 dSP; |
135 int count; | |
136 | 136 |
137 ENTER; | 137 ENTER; |
138 SAVETMPS; | 138 SAVETMPS; |
139 /* Some perl magic to run perl_plugin_pref_frame_SV perl sub and | 139 /* Some perl magic to run perl_plugin_pref_frame_SV perl sub and |
140 * return the frame */ | 140 * return the frame */ |
152 | 152 |
153 /* Tidy up the Perl stack */ | 153 /* Tidy up the Perl stack */ |
154 PUTBACK; | 154 PUTBACK; |
155 FREETMPS; | 155 FREETMPS; |
156 LEAVE; | 156 LEAVE; |
157 | 157 |
158 return ret_frame; | 158 return ret_frame; |
159 } | 159 } |
160 | 160 |
161 static void | 161 static void |
162 destroy_timeout_handler(GaimPerlTimeoutHandler *handler) | 162 destroy_timeout_handler(GaimPerlTimeoutHandler *handler) |