View | Details | Raw Unified | Return to bug 19258
Collapse All | Expand All

(-)a/members/pay.pl (-3 / +5 lines)
Lines 168-174 sub add_accounts_to_template { Link Here
168
sub get_for_redirect {
168
sub get_for_redirect {
169
    my ( $name, $name_in, $money ) = @_;
169
    my ( $name, $name_in, $money ) = @_;
170
    my $s     = q{&} . $name . q{=};
170
    my $s     = q{&} . $name . q{=};
171
    my $value = uri_escape_utf8( $input->param($name_in) );
171
    my $value;
172
    if (defined $input->param($name_in)) {
173
        $value = uri_escape_utf8( scalar $input->param($name_in) );
174
    }
172
    if ( !defined $value ) {
175
    if ( !defined $value ) {
173
        $value = ( $money == 1 ) ? 0 : q{};
176
        $value = ( $money == 1 ) ? 0 : q{};
174
    }
177
    }
Lines 196-202 sub redirect_to_paycollect { Link Here
196
    $redirect .= get_for_redirect( 'notify_id',    "notify_id$line_no",    0 );
199
    $redirect .= get_for_redirect( 'notify_id',    "notify_id$line_no",    0 );
197
    $redirect .= get_for_redirect( 'notify_level', "notify_level$line_no", 0 );
200
    $redirect .= get_for_redirect( 'notify_level', "notify_level$line_no", 0 );
198
    $redirect .= get_for_redirect( 'accountlines_id', "accountlines_id$line_no", 0 );
201
    $redirect .= get_for_redirect( 'accountlines_id', "accountlines_id$line_no", 0 );
199
    $redirect .= q{&} . 'payment_note' . q{=} . uri_escape_utf8( $input->param("payment_note_$line_no") );
202
    $redirect .= q{&} . 'payment_note' . q{=} . uri_escape_utf8( scalar $input->param("payment_note_$line_no") );
200
    $redirect .= '&remote_user=';
203
    $redirect .= '&remote_user=';
201
    $redirect .= $user;
204
    $redirect .= $user;
202
    return print $input->redirect($redirect);
205
    return print $input->redirect($redirect);
203
- 

Return to bug 19258