X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fsignup.cgi;h=02acf14aaf629862929e134006126ab8ac52b239;hp=7d1679b5c6f5b66b0927768b43d7b38f917b4e99;hb=90393980e5f2859ee1e186fa461f48f5129e803e;hpb=b1dacaef3f9773c72b4c6f525d2f1e584e1432fc diff --git a/fs_selfservice/FS-SelfService/cgi/signup.cgi b/fs_selfservice/FS-SelfService/cgi/signup.cgi index 7d1679b5c..02acf14aa 100755 --- a/fs_selfservice/FS-SelfService/cgi/signup.cgi +++ b/fs_selfservice/FS-SelfService/cgi/signup.cgi @@ -246,8 +246,8 @@ if ( $magic eq 'process' || $action eq 'process_signup' ) { print_decline(); } elsif ( $error eq '_collect' ) { map { $cgi->param($_, $rv->{$_}) } - qw( popup_url reference collectitems amount ); - print_collect(); + qw( popup_url reference amount ); + print_collect($rv); } elsif ( $error ) { #fudge the snarf info no strict 'refs'; @@ -302,9 +302,11 @@ sub print_collect { $error = "Error: $error" if $error; + my $rv = shift || {}; my $r = { $cgi->Vars, %{$init_data}, + %$rv, 'error' => $error, }; @@ -314,6 +316,7 @@ sub print_collect { $r->{self_url} = $cgi->self_url; print $cgi->header( '-expires' => 'now' ), + $collect_template->fill_in( PACKAGE => 'FS::SelfService::_signupcgi', HASH => $r ); @@ -442,23 +445,25 @@ sub collect_default { #html to use if there is a collect phase <<'END'; Pay now Pay now

- - - - - - +<%= +# +# +# +# +# +# +%> You are about to contact our payment processor to pay <%= $amount %> for <%= $pkg %>.

Your transaction reference number is <%= $reference %>

-
+ <%= - my %itemhash = @collectitems; + my %itemhash = @collectitems ; foreach my $input (keys %itemhash) { $OUT .= qq!!; }