X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;ds=sidebyside;f=yarrg%2Fweb%2Fquery_routesearch;h=6cf098ed82c63c8cfce1fe93fe6e889460415675;hb=27c23298aea5653ffba93b5a9c41bfa321b478d7;hp=fadc20ed8db5d0b5b12e6942ba09742c9fa3854b;hpb=cb6af6f4bf6b6c3f7852912ebec58e773a724a5a;p=ypp-sc-tools.db-live.git diff --git a/yarrg/web/query_routesearch b/yarrg/web/query_routesearch index fadc20e..6cf098e 100644 --- a/yarrg/web/query_routesearch +++ b/yarrg/web/query_routesearch @@ -36,14 +36,18 @@ <%args> $quri $dbh +$baseqf $queryqf $islandstring => ''; $capacitystring => ''; $lossperleague => ''; $capitalstring => ''; +$minprofitstring => ''; $distance => ''; +$prselector $someresults $emsgokorprint +$allargs %args> <%perl> @@ -53,7 +57,9 @@ my $emsg; my @warningfs; my @islandids; -my $maxmaxdist=35; +my $destspec; + +my @maxmaxdist= qw(35 35 60); my $maxcpu=90; my $concur_lim=5; @@ -64,12 +70,18 @@ my $maxcountea=15; %perl> +