Allow showing stall names in routetrade

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

diff --git a/yarrg/web/query_route b/yarrg/web/query_route
index ee726a9ced8d0a6c024c6d83bc3aaa95a7966882..b2c52b158f3b7c6531b48fbf9b0b34677ed56df8 100644 (file)
--- a/yarrg/web/query_route
+++ b/yarrg/web/query_route
@@ -36,6 +36,7 @@
 <%args>
 $quri
 $dbh
+$prselector
 $routestring => '';
 $someresults
 $emsgokorprint
@@ -50,11 +51,13 @@ my %islandid2;
 my $qa= \%ARGS;
 </%perl>
 
+<h1>Specify route</h1>
+
+% $prselector->('ShowStalls');
+
 %#---------- textbox, user enters route as string ----------
 % if (!$qa->{Dropdowns}) {
 
-<h1>Specify route</h1>
-
 Enter route (islands, or archipelagoes, separated by |s or commas;
  abbreviations are OK):<br>