Implement constraint on available capital

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

diff --git a/yarrg/web/lookup b/yarrg/web/lookup
index 7b3100ee17b28b541416d63f2fe4aed1506d9207..661095079e5576c1964ddf3d2f94a0a71b99a49e 100755 (executable)
--- a/yarrg/web/lookup
+++ b/yarrg/web/lookup
@@ -157,7 +157,7 @@ foreach my $var (@vars) {
 
 foreach my $var (keys %ARGS) {
        next unless $var =~
-               m/^(?: (?:route|commod|capacity)string |
+               m/^(?: (?:route|commod|capacity|capital)string |
                        lossperleague |
                        commodid |
                        islandid \d |