Fix dropdowns for route and commod

[ypp-sc-tools.db-live.git] / yarrg / web / query_route

diff --git a/yarrg/web/query_route b/yarrg/web/query_route
index ee457f57abd41502ad3d54f58385b16638e8ced5..393e7a668755145d05262a56b56ed005330669c1 100644 (file)
--- a/yarrg/web/query_route
+++ b/yarrg/web/query_route
@@ -86,10 +86,10 @@ Enter route (islands, or archipelagoes, separated by |s or commas;
 
 % } else { #---------- dropdowns, user selects from menus ----------
 
-$startform->(grep {
-               defined %ARGS{"archipelago$dd"} ||
-               defined %ARGS{"islandid$dd"}
-       } (0..$qa->{Dropdowns}-1));
+% $startform->(grep {
+%              defined $ARGS{"archipelago$_"} ||
+%              defined $ARGS{"islandid$_"}
+%      } (0..$qa->{Dropdowns}-1));
 
 <%perl>
 my ($sth,$row);