# HG changeset patch
# User Mark Doliner <mark@kingant.net>
# Date 1104180521 0
# Node ID 446f5f28e8d0a6833c9a1ec5c6aff5aa195c9db6
# Parent  08c8a18fb557936fdc7cff794896cec31d5f6f09
[gaim-migrate @ 11694]
sf patch #1090744, from Balwinder Singh Dheeman

Adds back a thingy to the perl API

committer: Tailor Script <tailor@pidgin.im>

diff -r 08c8a18fb557 -r 446f5f28e8d0 plugins/perl/common/Account.xs
--- 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