--- a/libpurple/plugins/perl/common/Request.xs Tue Sep 10 22:32:40 2013 +0200 +++ b/libpurple/plugins/perl/common/Request.xs Tue Sep 10 23:04:19 2013 +0200 @@ -167,7 +167,7 @@ gpr->cancel_fun = purple_perl_sv_from_fun(handle, cancel_cb); 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, gpr); OUTPUT: RETVAL