From 4c456dbec9fd31fa0676fe24159c67ff74724cdc Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Thu, 3 Sep 2009 00:38:31 +0100
Subject: [PATCH 1/1] Cosmetic and error report bugfixes

---
 yarrg/web/check_capacitystring | 2 +-
 yarrg/web/query_route          | 4 ++++
 yarrg/web/routetrade           | 2 +-
 3 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/yarrg/web/check_capacitystring b/yarrg/web/check_capacitystring
index 088c6c5..3d8f7a5 100644
--- a/yarrg/web/check_capacitystring
+++ b/yarrg/web/check_capacitystring
@@ -63,7 +63,7 @@ foreach $_ (split /\s+/, ${ $h->{String} }) {
 	} elsif (m/^([1-9]\d{0,5}(?:\.\d{0,3})?)t/) {
 		$def->('mass', $1 * 1000);
 	} else {
-		$h->{Emsg}= "Cannot understand capacity \`$_'.";
+		${ $h->{Emsg} }= "Cannot understand capacity \`$_'.";
 		last;
 	}
 }
diff --git a/yarrg/web/query_route b/yarrg/web/query_route
index a65ef1c..296c012 100644
--- a/yarrg/web/query_route
+++ b/yarrg/web/query_route
@@ -88,6 +88,8 @@ Enter route (islands, or archipelagoes, separated by |s or commas;
  size=80
 </&>
 
+<strong>Advanced options - you may leave these blank:</strong>
+<p>
 <table>
 <tr>
 <td>
@@ -99,6 +101,7 @@ Vessel capacity:
         ($max_volume,$max_mass) = @_;
     }
  &>
+ size=30
 </&>
 
 <td>
@@ -112,6 +115,7 @@ Estimated loss per league:
     thingstring => 'lossperleague', emsgstore => \$emsg,
     perresult => sub { ($lossperleaguepct)= @_; }
  &>
+ size=10
 </&>
 
 </table>
diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade
index 9a6824e..9311f1a 100644
--- a/yarrg/web/routetrade
+++ b/yarrg/web/routetrade
@@ -378,7 +378,7 @@ die "$cmpu $uue ?" if length $cmpu > 20;
 
 <p>
 % if (@islandids<=1) {
-Route is trivial.
+Route contains only one location.
 % }
 % if (!$specific) {
 Route contains archipelago(es), not just specific islands.
-- 
2.30.2