Mercurial > pidgin
comparison libpurple/plugins/perl/common/BuddyList.xs @ 16740:8e54f40a60f3
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
and make it all pretty-like. Ideally before the release.
| author | Etan Reisner <pidgin@unreliablesource.net> |
|---|---|
| date | Tue, 01 May 2007 03:21:27 +0000 |
| parents | 39c7bb133a9f |
| children | ee58212687bb |
comparison
equal
deleted
inserted
replaced
| 16739:39c7bb133a9f | 16740:8e54f40a60f3 |
|---|---|
| 48 PPCODE: | 48 PPCODE: |
| 49 for (l = purple_find_buddies(account, name); l != NULL; l = l->next) { | 49 for (l = purple_find_buddies(account, name); l != NULL; l = l->next) { |
| 50 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::BuddyList::Buddy"))); | 50 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::BuddyList::Buddy"))); |
| 51 } | 51 } |
| 52 | 52 |
| 53 gboolean | |
| 54 purple_group_on_account(group, account) | |
| 55 Purple::BuddyList::Group group | |
| 56 Purple::Account account | |
| 57 | |
| 58 Purple::BuddyList::Group | 53 Purple::BuddyList::Group |
| 59 purple_find_group(name) | 54 purple_find_group(name) |
| 60 const char *name | 55 const char *name |
| 56 | |
| 57 MODULE = Purple::BuddyList PACKAGE = Purple::Find PREFIX = purple_ | |
| 58 PROTOTYPES: ENABLE | |
| 59 | |
| 60 gboolean | |
| 61 purple_group_on_account(group, account) | |
| 62 Purple::BuddyList::Group group | |
| 63 Purple::Account account | |
| 61 | 64 |
| 62 MODULE = Purple::BuddyList PACKAGE = Purple::BuddyList::Contact PREFIX = purple_contact_ | 65 MODULE = Purple::BuddyList PACKAGE = Purple::BuddyList::Contact PREFIX = purple_contact_ |
| 63 PROTOTYPES: ENABLE | 66 PROTOTYPES: ENABLE |
| 64 | 67 |
| 65 Purple::BuddyList::Contact | 68 Purple::BuddyList::Contact |