diff options
author | jeff <jeff> | 2007-01-20 00:08:39 +0000 |
---|---|---|
committer | jeff <jeff> | 2007-01-20 00:08:39 +0000 |
commit | bc85a6042dca1848a23623be5d6612e495121da5 (patch) | |
tree | 59f863d69743a6b3df2e50481dd1e240be02808e /httemplate/edit | |
parent | 216136a9a2aed14a099b9cc931c5b21a29c04894 (diff) |
strip all blank lines, not just trailing ones
Diffstat (limited to 'httemplate/edit')
-rw-r--r-- | httemplate/edit/process/quick-charge.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/edit/process/quick-charge.cgi b/httemplate/edit/process/quick-charge.cgi index a2eba3abc..024a281e0 100644 --- a/httemplate/edit/process/quick-charge.cgi +++ b/httemplate/edit/process/quick-charge.cgi @@ -4,9 +4,9 @@ % % my @description = (); % for ( my $row = 0; exists($param->{"description$row"}); $row++ ) { -% push @description, $param->{"description$row"}; +% push @description, $param->{"description$row"} +% if ($param->{"description$row"} =~ /\S/); % } -% pop @description until (!@description || $description[$#description]); % % $param->{"custnum"} =~ /^(\d+)$/ % or $error .= "Illegal customer number " . $param->{"custnum"} . " "; |