X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fcounties.cgi;h=c022a27d98b843f00973df980525d6593231ca6d;hb=2a56c671635687bf2648eb3a7cf4bce228101af3;hp=c9eb98500b5b9e6f8321cd6787c28b208d59fbae;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git diff --git a/httemplate/misc/counties.cgi b/httemplate/misc/counties.cgi index c9eb98500..c022a27d9 100644 --- a/httemplate/misc/counties.cgi +++ b/httemplate/misc/counties.cgi @@ -1,18 +1,7 @@ -% -% -% my( $state, $country ) = $cgi->param('arg'); -% -% my @counties = -% sort -% map { s/[\n\r]//g; $_; } -% map { $_->county; } -% qsearch( 'cust_main_county', -% { 'state' => $state, -% 'country' => $country, -% }, -% ) -% ; -% -% -% [ <% join(', ', map { qq("$_") } @counties) %> ] +<%init> + +my( $state, $country ) = $cgi->param('arg'); +my @counties = counties($state, $country); + +