diff libpurple/plugins/perl/common/Status.xs @ 16825:08b9f27cf219

Finish the removal of purple_presence_remove_buddy() and purple_presence_get_buddies(), re-instate the incorrectly removed purple_account_remove_buddies from gaim-compat.h

--- a/libpurple/plugins/perl/common/Status.xs	Thu May 03 14:48:29 2007 +0000
+++ b/libpurple/plugins/perl/common/Status.xs	Thu May 03 15:21:56 2007 +0000
@@ -113,16 +113,6 @@
 purple_presence_get_active_status(presence)
 	Purple::Presence presence
 
-void
-purple_presence_get_buddies(presence)
-	Purple::Presence presence
-PREINIT:
-	const GList *l;
-PPCODE:
-	for (l = purple_presence_get_buddies(presence); l != NULL; l = l->next) {
-		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::BuddyList::Buddy")));
-	}
-
 const char *
 purple_presence_get_chat_user(presence)
 	Purple::Presence presence
@@ -197,11 +187,6 @@
 	Purple::Conversation conv
 
 void
-purple_presence_remove_buddy(presence, buddy)
-	Purple::Presence presence
-	Purple::BuddyList::Buddy buddy
-
-void
 purple_presence_set_idle(presence, idle, idle_time)
 	Purple::Presence presence
 	gboolean idle