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

(-)a/acqui/lateorders.pl (-3 / +2 lines)
Lines 72-78 my $branch = $input->param('branch'); Link Here
72
my $op         = $input->param('op');
72
my $op         = $input->param('op');
73
73
74
my @errors = ();
74
my @errors = ();
75
if ( defined $delay and not $delay =~ /^\d{1,3}$/ ) {
75
if ( $delay and not $delay =~ /^\d{1,3}$/ ) {
76
    push @errors, {delay_digits => 1, bad_delay => $delay};
76
    push @errors, {delay_digits => 1, bad_delay => $delay};
77
}
77
}
78
78
Lines 85-91 if ($op and $op eq "send_alert"){ Link Here
85
    };
85
    };
86
    if ( $@ ) {
86
    if ( $@ ) {
87
        $template->param(error_claim => $@);
87
        $template->param(error_claim => $@);
88
    } elsif ( defined $err->{error} and $err->{error} eq "no_email" ) {
88
    } elsif ( ref $err and exists $err->{error} and $err->{error} eq "no_email" ) {
89
        $template->{VARS}->{'error_claim'} = "no_email";
89
        $template->{VARS}->{'error_claim'} = "no_email";
90
    } else {
90
    } else {
91
        $template->{VARS}->{'info_claim'} = 1;
91
        $template->{VARS}->{'info_claim'} = 1;
92
- 

Return to bug 5347