Mercurial > pidgin.yaz

diff libpurple/plugins/perl/common/Request.xs @ 21236:73c5f5bfeb39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
disapproval of revision '4b2b98ecc70947f687d13c902b1b031247b49392'
author Richard Laager <rlaager@wiktel.com>
date Fri, 16 Nov 2007 23:27:01 +0000
parents fba1f6c3df0b
children fcb848b2d669
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/Request.xs	Sun Oct 14 18:07:19 2007 +0000
+++ b/libpurple/plugins/perl/common/Request.xs	Fri Nov 16 23:27:01 2007 +0000
@@ -141,7 +141,7 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_input_with_hint(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, PURPLE_REQUEST_HINT_BLIST, gpr);
+	RETVAL = purple_request_input_with_hint(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, "blist", gpr);
 OUTPUT:
 	RETVAL
 
@@ -196,7 +196,7 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_file_with_hint(handle, title, filename, savedialog, G_CALLBACK(purple_perl_request_ok_cb), G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, PURPLE_REQUEST_HINT_BLIST, gpr);
+	RETVAL = purple_request_file_with_hint(handle, title, filename, savedialog, G_CALLBACK(purple_perl_request_ok_cb), G_CALLBACK(purple_perl_request_cancel_cb), NULL, NULL, NULL, "blist", gpr);
 OUTPUT:
 	RETVAL
 
@@ -248,7 +248,7 @@
 	gpr->cancel_cb = g_strdup_printf("Purple::Script::%s::%s", basename, SvPV(cancel_cb, len));
 	g_free(basename);
 
-	RETVAL = purple_request_fields_with_hint(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, PURPLE_REQUEST_HINT_BLIST, gpr);
+	RETVAL = purple_request_fields_with_hint(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, "blist", gpr);
 OUTPUT:
 	RETVAL