Mercurial > pidgin
diff libpurple/plugins/perl/common/AccountOpts.xs @ 15833:2f8274ce570a
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
author | Daniel Atallah <daniel.atallah@gmail.com> |
---|---|
date | Mon, 19 Mar 2007 17:02:24 +0000 |
parents | 5fe8042783c1 |
children | ab6d2763b8d8 |
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/AccountOpts.xs Mon Mar 19 17:01:28 2007 +0000 +++ b/libpurple/plugins/perl/common/AccountOpts.xs Mon Mar 19 17:02:24 2007 +0000 @@ -1,39 +1,39 @@ #include "module.h" -MODULE = Gaim::Account::Option PACKAGE = Gaim::Account::Option PREFIX = gaim_account_option_ +MODULE = Purple::Account::Option PACKAGE = Purple::Account::Option PREFIX = purple_account_option_ PROTOTYPES: ENABLE void -gaim_account_option_destroy(option) - Gaim::Account::Option option +purple_account_option_destroy(option) + Purple::Account::Option option const char * -gaim_account_option_get_default_string(option) - Gaim::Account::Option option +purple_account_option_get_default_string(option) + Purple::Account::Option option void -gaim_account_option_add_list_item(option, key, value) - Gaim::Account::Option option +purple_account_option_add_list_item(option, key, value) + Purple::Account::Option option const char * key const char * value void -gaim_account_option_set_default_string(option, value); - Gaim::Account::Option option +purple_account_option_set_default_string(option, value); + Purple::Account::Option option const char * value void -gaim_account_option_set_default_int(option, value); - Gaim::Account::Option option +purple_account_option_set_default_int(option, value); + Purple::Account::Option option int value void -gaim_account_option_set_default_bool(option, value); - Gaim::Account::Option option +purple_account_option_set_default_bool(option, value); + Purple::Account::Option option gboolean value -Gaim::Account::Option -gaim_account_option_list_new(class, text, pref_name, values) +Purple::Account::Option +purple_account_option_list_new(class, text, pref_name, values) const char * text const char * pref_name SV * values @@ -48,83 +48,83 @@ STRLEN t_sl; t_GL = g_list_append(t_GL, SvPV(*av_fetch((AV *)SvRV(values), i, 0), t_sl)); } - RETVAL = gaim_account_option_list_new(text, pref_name, t_GL); + RETVAL = purple_account_option_list_new(text, pref_name, t_GL); OUTPUT: RETVAL -Gaim::Account::Option -gaim_account_option_string_new(class, text, pref_name, default_value) +Purple::Account::Option +purple_account_option_string_new(class, text, pref_name, default_value) const char * text const char * pref_name const char * default_value C_ARGS: text, pref_name, default_value -Gaim::Account::Option -gaim_account_option_int_new(class, text, pref_name, default_value) +Purple::Account::Option +purple_account_option_int_new(class, text, pref_name, default_value) const char * text const char * pref_name gboolean default_value C_ARGS: text, pref_name, default_value -Gaim::Account::Option -gaim_account_option_bool_new(class, text, pref_name, default_value) +Purple::Account::Option +purple_account_option_bool_new(class, text, pref_name, default_value) const char * text const char * pref_name gboolean default_value C_ARGS: text, pref_name, default_value -Gaim::Account::Option -gaim_account_option_new(class, type, text, pref_name) - Gaim::PrefType type +Purple::Account::Option +purple_account_option_new(class, type, text, pref_name) + Purple::PrefType type const char * text const char * pref_name C_ARGS: type, text, pref_name void -gaim_account_option_get_list(option) - Gaim::Account::Option option +purple_account_option_get_list(option) + Purple::Account::Option option PREINIT: const GList *l; PPCODE: - for (l = gaim_account_option_get_list(option); l != NULL; l = l->next) { - /* XXX These are actually GaimKeyValuePairs but we don't have a + for (l = purple_account_option_get_list(option); l != NULL; l = l->next) { + /* XXX These are actually PurpleKeyValuePairs but we don't have a * type for that and even if we did I don't think there's * anything perl could do with them, so I'm just going to - * leave this as a Gaim::ListEntry for now. */ - XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); + * leave this as a Purple::ListEntry for now. */ + XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry"))); } -Gaim::PrefType -gaim_account_option_get_type(option) - Gaim::Account::Option option +Purple::PrefType +purple_account_option_get_type(option) + Purple::Account::Option option gboolean -gaim_account_option_get_masked(option) - Gaim::Account::Option option +purple_account_option_get_masked(option) + Purple::Account::Option option int -gaim_account_option_get_default_int(option) - Gaim::Account::Option option; +purple_account_option_get_default_int(option) + Purple::Account::Option option; gboolean -gaim_account_option_get_default_bool(option) - Gaim::Account::Option option; +purple_account_option_get_default_bool(option) + Purple::Account::Option option; const char * -gaim_account_option_get_setting(option) - Gaim::Account::Option option +purple_account_option_get_setting(option) + Purple::Account::Option option const char * -gaim_account_option_get_text(option) - Gaim::Account::Option option +purple_account_option_get_text(option) + Purple::Account::Option option void -gaim_account_option_set_list(option, values) - Gaim::Account::Option option +purple_account_option_set_list(option, values) + Purple::Account::Option option SV * values PREINIT: GList *t_GL; @@ -137,18 +137,18 @@ STRLEN t_sl; t_GL = g_list_append(t_GL, SvPV(*av_fetch((AV *)SvRV(values), i, 0), t_sl)); } - gaim_account_option_set_list(option, t_GL); + purple_account_option_set_list(option, t_GL); void -gaim_account_option_set_masked(option, masked) - Gaim::Account::Option option +purple_account_option_set_masked(option, masked) + Purple::Account::Option option gboolean masked -MODULE = Gaim::Account::Option PACKAGE = Gaim::Account::UserSplit PREFIX = gaim_account_user_split_ +MODULE = Purple::Account::Option PACKAGE = Purple::Account::UserSplit PREFIX = purple_account_user_split_ PROTOTYPES: ENABLE -Gaim::Account::UserSplit -gaim_account_user_split_new(class, text, default_value, sep) +Purple::Account::UserSplit +purple_account_user_split_new(class, text, default_value, sep) const char * text const char * default_value char sep @@ -156,13 +156,13 @@ text, default_value, sep char -gaim_account_user_split_get_separator(split) - Gaim::Account::UserSplit split +purple_account_user_split_get_separator(split) + Purple::Account::UserSplit split const char * -gaim_account_user_split_get_text(split) - Gaim::Account::UserSplit split +purple_account_user_split_get_text(split) + Purple::Account::UserSplit split void -gaim_account_user_split_destroy(split) - Gaim::Account::UserSplit split +purple_account_user_split_destroy(split) + Purple::Account::UserSplit split