From: Mark D. <the...@us...> - 2005-02-23 04:50:13
|
Update of /cvsroot/gaim/gaim/plugins/perl/common In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26000 Modified Files: BuddyList.xs Log Message: This doesn't compile. That was silly of me. Index: BuddyList.xs =================================================================== RCS file: /cvsroot/gaim/gaim/plugins/perl/common/BuddyList.xs,v retrieving revision 1.9 retrieving revision 1.10 diff -u -d -p -r1.9 -r1.10 --- BuddyList.xs 23 Feb 2005 04:31:38 -0000 1.9 +++ BuddyList.xs 23 Feb 2005 04:50:03 -0000 1.10 @@ -65,20 +65,6 @@ PPCODE: g_slist_free(l); -void -get_buddies(account) - Gaim::Account account -PREINIT: - GSList *l; -PPCODE: - for (l = gaim_get_account_buddies(account); l != NULL; l = l->next) - { - XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, - "Gaim::BuddyList::Buddy"))); - } - - g_slist_free(l); - Gaim::BuddyList::Group find_group(name) const char *name |