X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Flookup;h=8475f689d4bb31b3bc452d5a99eccf163a7895f9;hb=4311ae355f0a94637c94d1d02a6edcbe65bebaa7;hp=a56adf7a2e7d8ee2b45e047ba30d85c92e72f017;hpb=00ba9271fd8409f29fcae6ee2af15824810bc939;p=ypp-sc-tools.web-live.git diff --git a/yarrg/web/lookup b/yarrg/web/lookup index a56adf7..8475f68 100755 --- a/yarrg/web/lookup +++ b/yarrg/web/lookup @@ -68,10 +68,16 @@ my %styles; QuerySpecific => 1, }, { Name => 'ShowBlank', Before => '', - Values => [ [ 'omit', 'Omit islands with no offers' ], + Values => [ [ 0, 'Omit islands with no offers' ], [ 'show', 'Show all islands' ], ], QuerySpecific => 1, + }, { Name => 'ShowStalls', + Before => '', + Values => [ [ 0, 'Show amount at each price' ], + [ 1, 'Show individual stalls' ], + ], + QuerySpecific => 1, }); foreach my $var (@vars) { @@ -129,7 +135,12 @@ foreach my $var (@vars) { foreach my $var (keys %ARGS) { next unless $var =~ - m/^(?:(?:route|commod)string|islandid\d|archipelago\d|debug)$/; + m/^(?: (?:route|commod)string | + islandid \d | + archipelago \d | + debug | + rtsel[ag]_\w+ + )$/x; my $val= $ARGS{$var}; next if $val eq 'none'; $queryqf{$var}= $val;