--- a/libpurple/plugins/perl/common/Request.xs Tue Sep 10 15:34:10 2013 +0200 +++ b/libpurple/plugins/perl/common/Request.xs Tue Sep 10 21:47:37 2013 +0200 @@ -144,7 +144,7 @@ gpr->cancel_fun = purple_perl_sv_from_fun(handle, cancel_cb); 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, gpr); OUTPUT: RETVAL