X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Fcheck_capacitystring;h=a79b6f1ac06f1dffbed02820e33a819a1e31bb29;hb=767fa1cf87952a46530bfaa2de0543ac07b64c2a;hp=3c779727ea005d2ce3e6766a59702bbb1c937890;hpb=422fab9f34f08090bca02f67cb41bba31f816c7e;p=ypp-sc-tools.db-test.git

diff --git a/yarrg/web/check_capacitystring b/yarrg/web/check_capacitystring
index 3c77972..a79b6f1 100644
--- a/yarrg/web/check_capacitystring
+++ b/yarrg/web/check_capacitystring
@@ -88,6 +88,9 @@ my $parse_values= sub {
 	elsif (s/^( $iqtyrex ) \s* ([a-z ]+) \s+ //xo) {
 		my ($qty,$spec) = ($1,$2);
 		$debugf->("VALUE COMMOD $qty '$spec'");
+		expected_error("Capacity specification must start with".
+			       " ship size or amount with units")
+			if $first_term;
 	        $commodsth ||=
 		    $dbh->prepare("SELECT commodname,unitmass,unitvolume
 				     FROM commods WHERE commodname LIKE ?");