diff libpurple/plugins/perl/common/AccountOpts.xs @ 15833:2f8274ce570a

Perl fixes for s/gaim/purple/. This hasn't really been tested yet.

--- 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