summaryrefslogtreecommitdiff
path: root/httemplate/edit/process/quick-charge.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/edit/process/quick-charge.cgi')
-rw-r--r--httemplate/edit/process/quick-charge.cgi2
1 files changed, 1 insertions, 1 deletions
diff --git a/httemplate/edit/process/quick-charge.cgi b/httemplate/edit/process/quick-charge.cgi
index f614dd5cf..a2eba3abc 100644
--- a/httemplate/edit/process/quick-charge.cgi
+++ b/httemplate/edit/process/quick-charge.cgi
@@ -6,7 +6,7 @@
% for ( my $row = 0; exists($param->{"description$row"}); $row++ ) {
% push @description, $param->{"description$row"};
% }
-% pop @description until ($description[$#description]);
+% pop @description until (!@description || $description[$#description]);
%
% $param->{"custnum"} =~ /^(\d+)$/
% or $error .= "Illegal customer number " . $param->{"custnum"} . " ";