fix quick order
authorivan <ivan>
Tue, 11 Sep 2001 09:56:27 +0000 (09:56 +0000)
committerivan <ivan>
Tue, 11 Sep 2001 09:56:27 +0000 (09:56 +0000)
README.1.4.0pre2-3
httemplate/edit/process/quick-cust_pkg.cgi
httemplate/view/cust_main.cgi

index c8d9990..eac5dae 100644 (file)
@@ -27,10 +27,10 @@ CREATE TABLE queue_arg (
 
 CREATE INDEX queue_arg1 ON queue_arg ( jobnum );
 
-Run bin/fs-migrate-part_svc
-
 Run bin/dbdef-create
 
+Run bin/fs-migrate-part_svc
+
 Create the `/usr/local/etc/freeside/cache.<i>datasrc</i>' directory
   (ownded by the freeside user).
 
index 5ac315d..ff0c5b2 100644 (file)
@@ -1,12 +1,12 @@
 <%
-#<!-- $Id: quick-cust_pkg.cgi,v 1.1 2001-09-04 14:44:07 ivan Exp $ -->
+#<!-- $Id: quick-cust_pkg.cgi,v 1.2 2001-09-11 09:56:27 ivan Exp $ -->
 
 use strict;
 use vars qw( $cgi $custnum $pkgpart $error ); #@remove_pkgnums @pkgparts
 use CGI;
 use CGI::Carp qw(fatalsToBrowser);
 use FS::UID qw(cgisuidsetup);
-use FS::CGI qw(popurl);
+use FS::CGI qw(popurl eidiot);
 use FS::cust_pkg;
 
 $cgi = new CGI; # create form object
index b3ea336..174c087 100755 (executable)
@@ -1,5 +1,5 @@
 <%
-#<!-- $Id: cust_main.cgi,v 1.9 2001-09-04 14:44:07 ivan Exp $ -->
+#<!-- $Id: cust_main.cgi,v 1.10 2001-09-11 09:56:27 ivan Exp $ -->
 
 use strict;
 use vars qw ( $cgi $query $custnum $cust_main $hashref $agent $referral 
@@ -252,7 +252,7 @@ print '</TD></TR></TABLE>';
 print '<BR>'.
   '<FORM ACTION="'.popurl(2).'edit/process/quick-cust_pkg.cgi" METHOD="POST">'.
   qq!<INPUT TYPE="hidden" NAME="custnum" VALUE="$custnum">!.
-  '<SELECT NAME="pkgpart"><OPTION>';
+  '<SELECT NAME="pkgpart"><OPTION> ';
 
 foreach my $type_pkgs ( qsearch('type_pkgs',{'typenum'=> $agent->typenum }) ) {
   my $pkgpart = $type_pkgs->pkgpart;