fix "URL limit exceeded" when errors are present on quick payment entry, RT#9917

[freeside.git] / httemplate / elements / handle_uri_query

diff --git a/httemplate/elements/handle_uri_query b/httemplate/elements/handle_uri_query
new file mode 100644 (file)
index 0000000..eb7ea1a
--- /dev/null
+++ b/httemplate/elements/handle_uri_query
@@ -0,0 +1,8 @@
+<%init>
+if ( $cgi->param('redirect') ) {
+  my $session = $cgi->param('redirect');
+  my $pref = $FS::CurrentUser::CurrentUser->option("redirect$session");
+  die "unknown redirect session $session\n" unless length($pref);
+  $cgi = new CGI($pref);
+}
+</%init>