From 810f6c351cbc38838daca5b795838ade12711999 Mon Sep 17 00:00:00 2001
From: jeff <jeff>
Date: Mon, 15 Jan 2007 22:15:26 +0000
Subject: [PATCH] that was DUM

---
 httemplate/edit/process/quick-charge.cgi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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"} . "  ";
-- 
2.11.0