From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Wed, 2 Sep 2009 22:55:19 +0000 (+0100)
Subject: Plumb max mass/vol through to routetrade
X-Git-Tag: 3.4~16
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.web-live.git;a=commitdiff_plain;h=9493637c44b0e22b2b9f72cf9e2748585064be56

Plumb max mass/vol through to routetrade
---

diff --git a/yarrg/web/query_route b/yarrg/web/query_route
index d4a3bd1..759c9c5 100644
--- a/yarrg/web/query_route
+++ b/yarrg/web/query_route
@@ -238,7 +238,9 @@ for my $dd (0..$qa->{Dropdowns}-1) {
    dbh => $dbh,
    islandids => \@islandids,
    archipelagoes => \@archipelagoes,
-   qa => $qa
+   qa => $qa,
+   max_mass => $max_mass,
+   max_volume => $max_volume
  &>
 </form>
 % }
diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade
index 5db4c58..7e1a06e 100644
--- a/yarrg/web/routetrade
+++ b/yarrg/web/routetrade
@@ -38,11 +38,18 @@ $dbh
 @islandids
 @archipelagoes
 $qa
+$max_mass
+$max_volume
 </%args>
 <&| script &>
   da_pageload= Date.now();
 </&script>
 
+% if (defined $max_mass || defined $max_volume) {
+<strong>WARNING - VESSEL CAPACITY LIMIT NOT YET IMPLEMENTED</strong>
+<p>
+% }
+
 <%perl>
 
 my $now= time;