Support Specific Destination route search

[ypp-sc-tools.main.git] / yarrg / web / lookup

diff --git a/yarrg/web/lookup b/yarrg/web/lookup
index b99cf0ae32f90c5b1d8060d68e44b35b32781084..15c52067f45cfeb40d090a8c86e63903f9d83ff2 100755 (executable)
--- a/yarrg/web/lookup
+++ b/yarrg/web/lookup
@@ -87,6 +87,7 @@ my %styles;
                Before => 'Type of routes to search for: ',
                Values => [     [ 0, 'Open-ended' ],
                                [ 1, 'Circular' ],
+                               [ 2, 'Specific destination' ],
                        ],
                QuerySpecific => 1,
        });
@@ -166,7 +167,7 @@ foreach my $var (@vars) {
 foreach my $var (keys %ARGS) {
        next unless $var =~
                m/^(?: (?:route|commod|capacity|capital|minprofit
-                        |island)string |
+                        |island|dest)string |
                        lossperleague | distance |
                        commodid |
                        islandid \d |