# HG changeset patch
# User Etan Reisner <pidgin@unreliablesource.net>
# Date 1136796545 0
# Node ID 33cb3206af90fab527fcdafdffbfb37bb680ba19
# Parent  6312f6e69eea087fc091a2e707ece24a4f7aa647
[gaim-migrate @ 15139]
More whitespace, and return type stuff. I'm beginning to get to the end of the
easy ones now.

committer: Tailor Script <tailor@pidgin.im>

diff -r 6312f6e69eea -r 33cb3206af90 plugins/perl/common/Prpl.xs
--- a/plugins/perl/common/Prpl.xs	Mon Jan 09 08:42:13 2006 +0000
+++ b/plugins/perl/common/Prpl.xs	Mon Jan 09 08:49:05 2006 +0000
@@ -7,12 +7,10 @@
 gaim_find_prpl(id)
 	const char *id
 
-
 MODULE = Gaim::Prpl  PACKAGE = Gaim::Prpl  PREFIX = gaim_prpl_
 PROTOTYPES: ENABLE
 
-
-void 
+void
 gaim_prpl_change_account_status(account, old_status, new_status)
 	Gaim::Account account
 	Gaim::Status old_status
@@ -23,35 +21,34 @@
 	Gaim::Account account
 	Gaim::Presence presence
 PREINIT:
-        GList *l;
+	GList *l;
 PPCODE:
-        for (l = gaim_prpl_get_statuses(account,presence); l != NULL; l = l->next) {
-                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem")));
-        }
+	for (l = gaim_prpl_get_statuses(account,presence); l != NULL; l = l->next) {
+		/* XXX Someone please test and make sure this is the right
+		 * type for these things. */
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Status")));
+	}
 
-
-
-void 
+void
 gaim_prpl_got_account_idle(account, idle, idle_time)
 	Gaim::Account account
 	gboolean idle
 	time_t idle_time
 
-void 
+void
 gaim_prpl_got_account_login_time(account, login_time)
 	Gaim::Account account
 	time_t login_time
 
-void 
+void
 gaim_prpl_got_user_idle(account, name, idle, idle_time)
 	Gaim::Account account
 	const char *name
 	gboolean idle
 	time_t idle_time
 
-void 
+void
 gaim_prpl_got_user_login_time(account, name, login_time)
 	Gaim::Account account
 	const char *name
 	time_t login_time
-