comparison libpurple/plugins/perl/common/Account.xs @ 18633:075c8dab16e2

More perl bindings from Zsombor Welker, fixes #1830

18632:e47ff6610fc7

    for (iter = list; iter != NULL; iter = iter->next) {
        XPUSHs(sv_2mortal(purple_perl_bless_object(iter->data, "Purple::Account")));
    }
    g_list_free(list);

Purple::Account
purple_accounts_find(name, protocol)
    const char * name
    const char * protocol

18633:075c8dab16e2

    for (iter = list; iter != NULL; iter = iter->next) {
        XPUSHs(sv_2mortal(purple_perl_bless_object(iter->data, "Purple::Account")));
    }
    g_list_free(list);

void
purple_accounts_restore_current_statuses()

Purple::Account
purple_accounts_find(name, protocol)
    const char * name
    const char * protocol