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)