Mercurial > pidgin

comparison plugins/perl/common/Request.xs @ 11130:3f3bc7f1b6bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 13186] Fixed warning messages committer: Tailor Script <tailor@pidgin.im>
author John H. Kelm <johnkelm@gmail.com>
date Tue, 19 Jul 2005 10:03:10 +0000
parents 134d0001983d
children 0e9e2b923d09
comparison
equal deleted inserted replaced
11129:0754ce8f1122 11130:3f3bc7f1b6bf
59 59
60 Gaim::Account 60 Gaim::Account
61 gaim_request_field_account_get_default_value(field) 61 gaim_request_field_account_get_default_value(field)
62 Gaim::Request::Field field 62 Gaim::Request::Field field
63 63
64 SV * 64 IV
65 gaim_request_field_account_get_filter(field) 65 gaim_request_field_account_get_filter(field)
66 Gaim::Request::Field field 66 Gaim::Request::Field field
67 CODE:
68 RETVAL = PTR2IV(gaim_request_field_account_get_filter(field));
69 OUTPUT:
70 RETVAL
67 71
68 gboolean 72 gboolean
69 gaim_request_field_account_get_show_all(field) 73 gaim_request_field_account_get_show_all(field)
70 Gaim::Request::Field field 74 Gaim::Request::Field field
71 75
269 273
270 void 274 void
271 gaim_request_field_list_get_items(field) 275 gaim_request_field_list_get_items(field)
272 Gaim::Request::Field field 276 Gaim::Request::Field field
273 PREINIT: 277 PREINIT:
274 GList *l; 278 const GList *l;
275 PPCODE: 279 PPCODE:
276 for (l = gaim_request_field_list_get_items(field); l != NULL; l = l->next) { 280 for (l = gaim_request_field_list_get_items(field); l != NULL; l = l->next) {
277 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem"))); 281 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem")));
278 } 282 }
279 283
283 287
284 void 288 void
285 gaim_request_field_list_get_selected(field) 289 gaim_request_field_list_get_selected(field)
286 Gaim::Request::Field field 290 Gaim::Request::Field field
287 PREINIT: 291 PREINIT:
288 GList *l; 292 const GList *l;
289 PPCODE: 293 PPCODE:
290 for (l = gaim_request_field_list_get_selected(field); l != NULL; l = l->next) { 294 for (l = gaim_request_field_list_get_selected(field); l != NULL; l = l->next) {
291 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem"))); 295 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem")));
292 } 296 }
293 297
437 441
438 void 442 void
439 gaim_request_fields_get_required(fields) 443 gaim_request_fields_get_required(fields)
440 Gaim::Request::Fields fields 444 Gaim::Request::Fields fields
441 PREINIT: 445 PREINIT:
442 GList *l; 446 const GList *l;
443 PPCODE: 447 PPCODE:
444 for (l = gaim_request_fields_get_required(fields); l != NULL; l = l->next) { 448 for (l = gaim_request_fields_get_required(fields); l != NULL; l = l->next) {
445 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem"))); 449 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem")));
446 } 450 }
447 451