X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Fquery_route;h=be1196e899ab3fa8e99c8c9b975a59b4ff6ebc10;hb=f6d7a4d627f3ecc0624649bb895dbf8e59afcf47;hp=b2c52b158f3b7c6531b48fbf9b0b34677ed56df8;hpb=2007f48bd68be9218b8f41acd9ba32d378a1b22c;p=ypp-sc-tools.db-live.git diff --git a/yarrg/web/query_route b/yarrg/web/query_route index b2c52b1..be1196e 100644 --- a/yarrg/web/query_route +++ b/yarrg/web/query_route @@ -166,9 +166,8 @@ function ms_Setarch(dd) { % } #---------- end of dropdowns, now common middle of page code ---------- -% my $ours= sub { $_[0] =~ m/^island|^archipelago|^routestring/; }; +% my $ours= sub { $_[0] =~ m/^island|^archipelago|^routestring|^[RT]/; }; <& "lookup:formhidden", ours => $ours &> - <%perl> #========== results ========== @@ -206,11 +205,12 @@ for my $dd (0..$qa->{Dropdowns}-1) { % if (@islandids) { -% $someresults->(); +% $someresults->('Relevant trades'); <& routetrade, dbh => $dbh, islandids => \@islandids, archipelagoes => \@archipelagoes, qa => $qa &> + % }