# HG changeset patch
# User Gabriel Schulhof <nix@go-nix.ca>
# Date 1187465971 0
# Node ID b80d3c8097d496073895b089c536e3e2527ea1e2
# Parent  ce7569c8aa0d8d10add40dab1d1130c49fd222b8
Updating Request.xs

diff -r ce7569c8aa0d -r b80d3c8097d4 libpurple/plugins/perl/common/Request.xs
--- a/libpurple/plugins/perl/common/Request.xs	Sat Aug 18 00:00:13 2007 +0000
+++ b/libpurple/plugins/perl/common/Request.xs	Sat Aug 18 19:39:31 2007 +0000
@@ -2,12 +2,13 @@
 
 /* This breaks on faceprint's amd64 box
 void *
-purple_request_action_varg(handle, title, primary, secondary, default_action, user_data, action_count, actions)
+purple_request_action_varg(handle, title, primary, secondary, default_action, ui_hint, user_data, action_count, actions)
 	void * handle
 	const char *title
 	const char *primary
 	const char *secondary
 	unsigned int default_action
+	const char * ui_hint
 	void *user_data
 	size_t action_count
 	va_list actions
@@ -116,7 +117,7 @@
 }
 
 void *
-purple_request_input(handle, title, primary, secondary, default_value, multiline, masked, hint, ok_text, ok_cb, cancel_text, cancel_cb)
+purple_request_input(handle, title, primary, secondary, default_value, multiline, masked, hint, ok_text, ok_cb, cancel_text, cancel_cb, ui_hint)
 	Purple::Plugin handle
 	const char * title
 	const char * primary
@@ -129,6 +130,7 @@
 	SV * ok_cb
 	const char * cancel_text
 	SV * cancel_cb
+	const char * ui_hint
 CODE:
 	PurplePerlRequestData *gpr;
 	STRLEN len;
@@ -141,18 +143,19 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_input(handle, title, primary, secondary, default_value, multiline, masked, hint, ok_text, G_CALLBACK(purple_perl_request_ok_cb), cancel_text, G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, gpr);
+	RETVAL = purple_request_input(handle, title, primary, secondary, default_value, multiline, masked, hint, ok_text, G_CALLBACK(purple_perl_request_ok_cb), cancel_text, G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, ui_hint, gpr);
 OUTPUT:
 	RETVAL
 
 void *
-purple_request_file(handle, title, filename, savedialog, ok_cb, cancel_cb)
+purple_request_file(handle, title, filename, savedialog, ok_cb, cancel_cb, ui_hint)
 	Purple::Plugin handle
 	const char * title
 	const char * filename
 	gboolean savedialog
 	SV * ok_cb
 	SV * cancel_cb
+	const char * ui_hint
 CODE:
 	PurplePerlRequestData *gpr;
 	STRLEN len;
@@ -165,12 +168,12 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_file(handle, title, filename, savedialog, G_CALLBACK(purple_perl_request_ok_cb), G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, gpr);
+	RETVAL = purple_request_file(handle, title, filename, savedialog, G_CALLBACK(purple_perl_request_ok_cb), G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, ui_hint, gpr);
 OUTPUT:
 	RETVAL
 
 void *
-purple_request_fields(handle, title, primary, secondary, fields, ok_text, ok_cb, cancel_text, cancel_cb)
+purple_request_fields(handle, title, primary, secondary, fields, ok_text, ok_cb, cancel_text, cancel_cb, ui_hint)
 	Purple::Plugin handle
 	const char * title
 	const char * primary
@@ -180,6 +183,7 @@
 	SV * ok_cb
 	const char * cancel_text
 	SV * cancel_cb
+	const char *ui_hint
 CODE:
 	PurplePerlRequestData *gpr;
 	STRLEN len;
@@ -192,7 +196,7 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_fields(handle, title, primary, secondary, fields, ok_text, G_CALLBACK(purple_perl_request_ok_cb), cancel_text, G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, gpr);
+	RETVAL = purple_request_fields(handle, title, primary, secondary, fields, ok_text, G_CALLBACK(purple_perl_request_ok_cb), cancel_text, G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, ui_hint, gpr);
 OUTPUT:
 	RETVAL