projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8930137
)
s/die/ediot/
author
ivan
<ivan>
Tue, 11 Sep 2001 10:05:30 +0000
(10:05 +0000)
committer
ivan
<ivan>
Tue, 11 Sep 2001 10:05:30 +0000
(10:05 +0000)
httemplate/edit/process/quick-cust_pkg.cgi
patch
|
blob
|
history
diff --git
a/httemplate/edit/process/quick-cust_pkg.cgi
b/httemplate/edit/process/quick-cust_pkg.cgi
index
ff0c5b2
..
c4f5172
100644
(file)
--- a/
httemplate/edit/process/quick-cust_pkg.cgi
+++ b/
httemplate/edit/process/quick-cust_pkg.cgi
@@
-1,5
+1,5
@@
<%
<%
-#<!-- $Id: quick-cust_pkg.cgi,v 1.
2 2001-09-11 09:56:27
ivan Exp $ -->
+#<!-- $Id: quick-cust_pkg.cgi,v 1.
3 2001-09-11 10:05:30
ivan Exp $ -->
use strict;
use vars qw( $cgi $custnum $pkgpart $error ); #@remove_pkgnums @pkgparts
use strict;
use vars qw( $cgi $custnum $pkgpart $error ); #@remove_pkgnums @pkgparts
@@
-15,10
+15,10
@@
$error = '';
#untaint custnum
$cgi->param('custnum') =~ /^(\d+)$/
#untaint custnum
$cgi->param('custnum') =~ /^(\d+)$/
- or
die
'illegal custnum '. $cgi->param('custnum');
+ or
eidiot
'illegal custnum '. $cgi->param('custnum');
$custnum = $1;
$cgi->param('pkgpart') =~ /^(\d+)$/
$custnum = $1;
$cgi->param('pkgpart') =~ /^(\d+)$/
- or
die
'illegal pkgpart '. $cgi->param('pkgpart');
+ or
eidiot
'illegal pkgpart '. $cgi->param('pkgpart');
$pkgpart = $1;
my @cust_pkg = ();
$pkgpart = $1;
my @cust_pkg = ();