1 files changed, 5 insertions, 15 deletions
diff --git a/httemplate/misc/counties.cgi b/httemplate/misc/counties.cgi
index 80ae616c9..c022a27d9 100644
--- a/httemplate/misc/counties.cgi
+++ b/httemplate/misc/counties.cgi
@@ -1,17 +1,7 @@
-<%
+[ <% join(', ', map { qq("$_") } @counties) %> ]
+<%init>
 
-  my( $state, $country ) = $cgi->param('arg');
+my( $state, $country ) = $cgi->param('arg');
+my @counties = counties($state, $country);
 
-  my @counties = 
-     sort
-     map { s/[\n\r]//g; $_; }
-     map { $_->county; }
-     qsearch( 'cust_main_county',
-              { 'state'   => $state,
-                'country' => $country,
-              },
-            )
-  ;
-
-
-%>[ <%= join(', ', map { qq("$_") } @counties) %> ]
+</%init>