changeset 12866:43d8af815a9d

[gaim-migrate @ 15217] Gaim::BuddyList::NodeFlags fits with the rest of the perl naming better than Gaim::BlistNodeFlags. Also some of the request api *_new functions now have default values so people can leave off the final parameter in the function call. Gaim::Request::Field::account_new("name", "label", undef) can now be Gaim::Request::Field::account_new("name", "label") for example. committer: Tailor Script <tailor@pidgin.im>
author Etan Reisner <pidgin@unreliablesource.net>
date Fri, 13 Jan 2006 23:00:43 +0000
parents 27c4145c6daa
children cf3540702d21
files plugins/perl/common/BuddyList.xs plugins/perl/common/Request.xs plugins/perl/common/module.h plugins/perl/common/typemap
diffstat 4 files changed, 8 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/plugins/perl/common/BuddyList.xs	Fri Jan 13 22:20:43 2006 +0000
+++ b/plugins/perl/common/BuddyList.xs	Fri Jan 13 23:00:43 2006 +0000
@@ -282,9 +282,9 @@
 void
 gaim_blist_node_set_flags(node, flags)
 	Gaim::BuddyList::Node node
-	Gaim::BlistNodeFlags flags
+	Gaim::BuddyList::NodeFlags flags
 
-Gaim::BlistNodeFlags
+Gaim::BuddyList::NodeFlags
 gaim_blist_node_get_flags(node)
 	Gaim::BuddyList::Node node
 
--- a/plugins/perl/common/Request.xs	Fri Jan 13 22:20:43 2006 +0000
+++ b/plugins/perl/common/Request.xs	Fri Jan 13 23:00:43 2006 +0000
@@ -186,7 +186,7 @@
 	Gaim::Request::Field field
 
 Gaim::Request::Field
-gaim_request_field_account_new(id, text, account)
+gaim_request_field_account_new(id, text, account = NULL)
 	const char *id
 	const char *text
 	Gaim::Account account
@@ -196,7 +196,6 @@
 	Gaim::Request::Field field
 	Gaim::Account default_value
 
-
 void
 gaim_request_field_account_set_show_all(field, show_all)
 	Gaim::Request::Field field
@@ -216,7 +215,7 @@
 	Gaim::Request::Field field
 
 Gaim::Request::Field
-gaim_request_field_bool_new(id, text, default_value)
+gaim_request_field_bool_new(id, text, default_value = TRUE)
 	const char *id
 	const char *text
 	gboolean default_value
@@ -255,7 +254,7 @@
 	Gaim::Request::Field field
 
 Gaim::Request::Field
-gaim_request_field_choice_new(id, text, default_value)
+gaim_request_field_choice_new(id, text, default_value = 0)
 	const char *id
 	const char *text
 	int default_value
@@ -299,7 +298,7 @@
 	Gaim::Request::Field field
 
 Gaim::Request::Field
-gaim_request_field_int_new(id, text, default_value)
+gaim_request_field_int_new(id, text, default_value = 0)
 	const char *id
 	const char *text
 	int default_value
--- a/plugins/perl/common/module.h	Fri Jan 13 22:20:43 2006 +0000
+++ b/plugins/perl/common/module.h	Fri Jan 13 23:00:43 2006 +0000
@@ -66,7 +66,7 @@
 /* blist.h */
 typedef GaimBlistNode *			Gaim__BuddyList__Node;
 typedef GaimBlistNodeAction *		Gaim__BuddyList__Node__Action;
-typedef GaimBlistNodeFlags		Gaim__BlistNodeFlags;
+typedef GaimBlistNodeFlags		Gaim__BuddyList__NodeFlags;
 typedef GaimBlistUiOps *		Gaim__BuddyList__UiOps;
 typedef GaimBuddyList *			Gaim__BuddyList;
 typedef GaimBuddy *			Gaim__BuddyList__Buddy;
--- a/plugins/perl/common/typemap	Fri Jan 13 22:20:43 2006 +0000
+++ b/plugins/perl/common/typemap	Fri Jan 13 23:00:43 2006 +0000
@@ -41,7 +41,6 @@
 Gaim::Account::UiOps			T_GaimObj
 Gaim::Account::UserSplit		T_GaimObj
 
-Gaim::BlistNodeFlags			T_IV
 Gaim::Buddy::Icon			T_GaimObj
 Gaim::Buddy::Icon::Spec			T_GaimObj
 Gaim::BuddyList				T_GaimObj
@@ -50,6 +49,7 @@
 Gaim::BuddyList::Contact		T_GaimObj
 Gaim::BuddyList::Group			T_GaimObj
 Gaim::BuddyList::Node			T_GaimObj
+Gaim::BuddyList::NodeFlags		T_IV
 Gaim::BuddyList::Node::Action		T_GaimObj
 Gaim::BuddyList::UiOps			T_GaimObj