diff plugins/perl/common/Account.xs @ 12364:6fd82071a7b8

[gaim-migrate @ 14668] sf patch #1373688, from Will Thompson "Make the Perl bindings more Perl-ish" committer: Tailor Script <tailor@pidgin.im>
author Mark Doliner <mark@kingant.net>
date Mon, 05 Dec 2005 23:54:34 +0000
parents eb14bbcf7249
children d3476701107d
line wrap: on
line diff
--- a/plugins/perl/common/Account.xs	Mon Dec 05 23:41:29 2005 +0000
+++ b/plugins/perl/common/Account.xs	Mon Dec 05 23:54:34 2005 +0000
@@ -8,9 +8,11 @@
 	Gaim::Account account
 
 Gaim::Account
-gaim_account_new(username, protocol_id)
+gaim_account_new(class, username, protocol_id)
 	const char * username
 	const char * protocol_id
+    C_ARGS:
+	username, protocol_id
 
 void 
 gaim_account_destroy(account)