# HG changeset patch
# User Nathan Walp <nwalp@pidgin.im>
# Date 1065415004 0
# Node ID 57478df4faf86f7a958000ea66d27875c824a7d3
# Parent  3a1b5a9b09c889a88be8b167faa2633869077906
[gaim-migrate @ 7744]
it would be cool if perl worked again, i guess

committer: Tailor Script <tailor@pidgin.im>

diff -r 3a1b5a9b09c8 -r 57478df4faf8 plugins/perl/common/Account.xs
--- a/plugins/perl/common/Account.xs	Mon Oct 06 04:26:21 2003 +0000
+++ b/plugins/perl/common/Account.xs	Mon Oct 06 04:36:44 2003 +0000
@@ -130,7 +130,7 @@
 	const char *name
 	const char *protocol_id
 CODE:
-	RETVAL = gaim_accounts_find_with_prpl_id(name, protocol_id);
+	RETVAL = gaim_accounts_find(name, protocol_id);
 OUTPUT:
 	RETVAL