summaryrefslogtreecommitdiff
path: root/httemplate/edit/cust_main_county.cgi
diff options
context:
space:
mode:
authorivan <ivan>2002-01-30 14:18:09 +0000
committerivan <ivan>2002-01-30 14:18:09 +0000
commit1fd6d8cf5d7854860ef4fd10ed89828e0c04ec39 (patch)
treecaee70f2707d97a43e21ea4253afe728ea6f421a /httemplate/edit/cust_main_county.cgi
parentea0d3938b57a079ce4aa6db0cae316e3ac6da654 (diff)
remove
use Module; and $cgi = new CGI; &cgisuidsetup(); from all templates. should work better under Mason.
Diffstat (limited to 'httemplate/edit/cust_main_county.cgi')
-rwxr-xr-xhttemplate/edit/cust_main_county.cgi23
1 files changed, 5 insertions, 18 deletions
diff --git a/httemplate/edit/cust_main_county.cgi b/httemplate/edit/cust_main_county.cgi
index f88601281..69def0468 100755
--- a/httemplate/edit/cust_main_county.cgi
+++ b/httemplate/edit/cust_main_county.cgi
@@ -1,18 +1,5 @@
+<!-- $Id: cust_main_county.cgi,v 1.6 2002-01-30 14:18:08 ivan Exp $ -->
<%
-#<!-- $Id: cust_main_county.cgi,v 1.5 2001-10-30 14:54:07 ivan Exp $ -->
-
-use strict;
-use vars qw( $cgi $cust_main_county );
-use CGI;
-use CGI::Carp qw(fatalsToBrowser);
-use FS::UID qw(cgisuidsetup);
-use FS::Record qw(qsearch qsearchs);
-use FS::CGI qw(header menubar popurl table);
-use FS::cust_main_county;
-
-$cgi = new CGI;
-
-&cgisuidsetup($cgi);
print header("Edit tax rates", menubar(
'Main Menu' => popurl(2),
@@ -32,10 +19,10 @@ print qq!<FORM ACTION="!, popurl(1),
</TR>
END
-foreach $cust_main_county ( sort { $a->country cmp $b->country
- or $a->state cmp $b->state
- or $a->county cmp $b->county
- } qsearch('cust_main_county',{}) ) {
+foreach my $cust_main_county ( sort { $a->country cmp $b->country
+ or $a->state cmp $b->state
+ or $a->county cmp $b->county
+ } qsearch('cust_main_county',{}) ) {
my($hashref)=$cust_main_county->hashref;
print <<END;
<TR>