changeset 10437:446f5f28e8d0

[gaim-migrate @ 11694] sf patch #1090744, from Balwinder Singh Dheeman Adds back a thingy to the perl API committer: Tailor Script <tailor@pidgin.im>
author Mark Doliner <mark@kingant.net>
date Mon, 27 Dec 2004 20:48:41 +0000
parents 08c8a18fb557
children d90ece33e72f
files plugins/perl/common/Account.xs
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/plugins/perl/common/Account.xs	Mon Dec 27 20:40:31 2004 +0000
+++ b/plugins/perl/common/Account.xs	Mon Dec 27 20:48:41 2004 +0000
@@ -3,6 +3,15 @@
 MODULE = Gaim::Account  PACKAGE = Gaim::Account  PREFIX = gaim_account_
 PROTOTYPES: ENABLE
 
+Gaim::Connection
+gaim_account_connect(account)
+	Gaim::Account account
+CODE:
+	RETVAL = gaim_account_connect(account,
+								  gaim_account_get_status(account, "online"));
+OUTPUT:
+	RETVAL
+
 void
 gaim_account_disconnect(account)
 	Gaim::Account account