diff 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
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/BuddyList.xs	Tue May 01 02:34:22 2007 +0000
+++ b/libpurple/plugins/perl/common/BuddyList.xs	Tue May 01 03:21:27 2007 +0000
@@ -50,15 +50,18 @@
 		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::BuddyList::Buddy")));
 	}
 
+Purple::BuddyList::Group
+purple_find_group(name)
+	const char *name
+
+MODULE = Purple::BuddyList  PACKAGE = Purple::Find  PREFIX = purple_
+PROTOTYPES: ENABLE
+
 gboolean
 purple_group_on_account(group, account)
 	Purple::BuddyList::Group  group
 	Purple::Account account
 
-Purple::BuddyList::Group
-purple_find_group(name)
-	const char *name
-
 MODULE = Purple::BuddyList  PACKAGE = Purple::BuddyList::Contact  PREFIX = purple_contact_
 PROTOTYPES: ENABLE