% if (!$i) {
<td colspan=2>
<strong>Start at <% $islandname |h %></strong>
-<td><a href="docs#posinclass">[?]</a>
-<td colspan=2>
+<td colspan=2><a href="docs#posinclass">[what are these codes?]</a>
+<td>
% } else {
% my $this_dist= $distance->($islandids[$i-1],$islandids[$i]);
% $total_dist += $this_dist;
$desc.= (sprintf ", commodity %d of %d",
$incl, $maxpic);
if ($classinfo->{'maxposinclass'} >= 8) {
- my @tmbs= qw(tt t m b bb);
+ my @tmbs= qw(0 1 2 3 4 5 6 7 8 9);
my $tmbi= ($incl+0.5)*$#tmbs/$maxpic;
- $abbrev.= " ".$tmbs[$tmbi];
+ $abbrev.= " ".$tmbs[$tmbi]." ";
}
}
$$todo->{'posinclass'}=