X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;ds=sidebyside;f=yarrg%2Fweb%2Froutetrade;h=7f7d27f45d26d51a25c20b42ff66003e60d6848a;hb=c1af6b2456f3313efcb4d40e3df2b628bfb4fae6;hp=482c13a3e9969e98e51afab2e8a8878be03bfeb3;hpb=a7d3f0bd7f84b3b40a7a7860f467f2beda20a227;p=ypp-sc-tools.main.git diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade index 482c13a..7f7d27f 100644 --- a/yarrg/web/routetrade +++ b/yarrg/web/routetrade @@ -597,11 +597,11 @@ $addcols->({ Total => 0, DoReverse => 1 }, qw( % $iquery->execute($islandids[$i]); % my ($islandname) = $iquery->fetchrow_array(); -% my $this_dist= $distance->($islandids[$i-1],$islandids[$i]); -% $total_dist += $this_dist; % if (!$i) { Start at <% $islandname |h %> % } else { +% my $this_dist= $distance->($islandids[$i-1],$islandids[$i]); +% $total_dist += $this_dist; Sail to <% $islandname |h %> - <% $this_dist |h %> leagues % }