# HG changeset patch
# User Daniel Atallah <daniel.atallah@gmail.com>
# Date 1195233104 0
# Node ID ca1d23ae3a2169e21f351247e38075224571cce2
# Parent  7a1099df36786325a7c95cf11517775eab1cd1c6
Add purple_plugin_pref_[sg]et_format_type to the Perl API.  There are a number of new functions that also need to be added, but I don't have time to do that right now. Fixes #3781.

diff -r 7a1099df3678 -r ca1d23ae3a21 libpurple/plugins/perl/common/PluginPref.xs
--- a/libpurple/plugins/perl/common/PluginPref.xs	Fri Nov 16 13:15:19 2007 +0000
+++ b/libpurple/plugins/perl/common/PluginPref.xs	Fri Nov 16 17:11:44 2007 +0000
@@ -93,6 +93,10 @@
 purple_plugin_pref_get_masked(pref)
 	Purple::PluginPref pref
 
+Purple::String::Format::Type
+purple_plugin_pref_get_format_type(pref)
+	Purple::PluginPref pref
+
 unsigned int
 purple_plugin_pref_get_max_length(pref)
 	Purple::PluginPref pref
@@ -145,6 +149,11 @@
 	gboolean mask
 
 void
+purple_plugin_pref_set_format_type(pref, format)
+	Purple::PluginPref pref
+	Purple::String::Format::Type format
+
+void
 purple_plugin_pref_set_max_length(pref, max_length)
 	Purple::PluginPref pref
 	unsigned int max_length
diff -r 7a1099df3678 -r ca1d23ae3a21 libpurple/plugins/perl/common/module.h
--- a/libpurple/plugins/perl/common/module.h	Fri Nov 16 13:15:19 2007 +0000
+++ b/libpurple/plugins/perl/common/module.h	Fri Nov 16 17:11:44 2007 +0000
@@ -197,6 +197,7 @@
 typedef PurplePluginPref *		Purple__PluginPref;
 typedef PurplePluginPrefFrame *		Purple__PluginPref__Frame;
 typedef PurplePluginPrefType		Purple__PluginPrefType;
+typedef PurpleStringFormatType		Purple__String__Format__Type;
 
 /* pounce.h */
 typedef PurplePounce *			Purple__Pounce;
diff -r 7a1099df3678 -r ca1d23ae3a21 libpurple/plugins/perl/common/typemap
--- a/libpurple/plugins/perl/common/typemap	Fri Nov 16 13:15:19 2007 +0000
+++ b/libpurple/plugins/perl/common/typemap	Fri Nov 16 17:11:44 2007 +0000
@@ -158,6 +158,7 @@
 const Purple::StatusType			T_PurpleObj
 
 Purple::StoredImage			T_PurpleObj
+Purple::String::Format::Type		T_IV
 Purple::Stringref				T_PurpleObj
 Purple::Util::FetchUrlData	T_PTR
 Purple::Util::InfoFieldFormatCallback	T_PTR