chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.main.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix error message for ambiguous vessels in capacities
[ypp-sc-tools.main.git]
/
yarrg
/
web
/
check_capacitystring
diff --git
a/yarrg/web/check_capacitystring
b/yarrg/web/check_capacitystring
index a79b6f1ac06f1dffbed02820e33a819a1e31bb29..4fd20546a4b3008b4140de42826cda1b019896dd 100644
(file)
--- a/
yarrg/web/check_capacitystring
+++ b/
yarrg/web/check_capacitystring
@@
-140,7
+140,7
@@
my $parse_term= sub {
dbw_lookup_string($_,$sth,1,1,2,
"Ship name `$_' not understood.",
"Too many matching ship types.",
dbw_lookup_string($_,$sth,1,1,2,
"Ship name `$_' not understood.",
"Too many matching ship types.",
- sub { "Ambiguous - could be $_[
0
]" });
+ sub { "Ambiguous - could be $_[
1
]" });
expected_error($emsg) if defined $emsg;
$debugf->("TERM NAME SHIP '$ship' @smv");
$show_answer= 1;
expected_error($emsg) if defined $emsg;
$debugf->("TERM NAME SHIP '$ship' @smv");
$show_answer= 1;