comparison plugins/perl/common/Account.xs @ 6595:782eef79cf3c

[gaim-migrate @ 7119] Moved a function from Gaim to Gaim::Accounts. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Sun, 24 Aug 2003 02:59:02 +0000
parents 12343e2aaab1
children 57478df4faf8
comparison
equal deleted inserted replaced
6594:47744949513f 6595:782eef79cf3c
123 123
124 void 124 void
125 gaim_accounts_remove(account) 125 gaim_accounts_remove(account)
126 Gaim::Account account 126 Gaim::Account account
127 127
128 Gaim::Account
129 find(name, protocol_id)
130 const char *name
131 const char *protocol_id
132 CODE:
133 RETVAL = gaim_accounts_find_with_prpl_id(name, protocol_id);
134 OUTPUT:
135 RETVAL
136
128 void * 137 void *
129 handle() 138 handle()
130 CODE: 139 CODE:
131 RETVAL = gaim_accounts_get_handle(); 140 RETVAL = gaim_accounts_get_handle();
132 OUTPUT: 141 OUTPUT:
141 GList *l; 150 GList *l;
142 PPCODE: 151 PPCODE:
143 for (l = gaim_accounts_get_all(); l != NULL; l = l->next) 152 for (l = gaim_accounts_get_all(); l != NULL; l = l->next)
144 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account"))); 153 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account")));
145 154
146 Gaim::Account
147 account_find(name, protocol_id)
148 const char *name
149 const char *protocol_id
150 CODE:
151 RETVAL = gaim_accounts_find_with_prpl_id(name, protocol_id);
152 OUTPUT:
153 RETVAL
154