diff options
| author | ivan <ivan> | 2002-06-26 01:35:08 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-06-26 01:35:08 +0000 |
| commit | ecb895ccbbf52ed2babc0885c9925022175e33a0 (patch) | |
| tree | b7bcc155a0c7f578c2015f3fd77c3180bb3ec462 /httemplate/edit/process/quick-cust_pkg.cgi | |
| parent | d17a7cdeed4fbd901084369347b56d3d4f02c11b (diff) | |
working one-time charges
Diffstat (limited to 'httemplate/edit/process/quick-cust_pkg.cgi')
| -rw-r--r-- | httemplate/edit/process/quick-cust_pkg.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/edit/process/quick-cust_pkg.cgi b/httemplate/edit/process/quick-cust_pkg.cgi index c663dce32..a8f5b1453 100644 --- a/httemplate/edit/process/quick-cust_pkg.cgi +++ b/httemplate/edit/process/quick-cust_pkg.cgi @@ -2,10 +2,10 @@ #untaint custnum $cgi->param('custnum') =~ /^(\d+)$/ - or eidiot 'illegal custnum '. $cgi->param('custnum'); + or die 'illegal custnum '. $cgi->param('custnum'); my $custnum = $1; $cgi->param('pkgpart') =~ /^(\d+)$/ - or eidiot 'illegal pkgpart '. $cgi->param('pkgpart'); + or die 'illegal pkgpart '. $cgi->param('pkgpart'); my $pkgpart = $1; my @cust_pkg = (); |