Mercurial > eagle-eye

diff planner.pl @ 297:073442284ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merged
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sun, 07 Dec 2008 15:12:33 +0800
parents 523ea51126bc
children 07f51bb67e56
line wrap: on
line diff
--- a/planner.pl	Sun Dec 07 15:10:51 2008 +0800
+++ b/planner.pl	Sun Dec 07 15:12:33 2008 +0800
@@ -54,7 +54,8 @@
 
 # NAVY
 my $city = LoadFile(sprintf("city-%s-dump.yaml", $navyCity));
-$city->{distance} = travelTime($targetCity->island->x, $targetCity->island->y, $city->{island}->{x}, $city->{island}->{y}, 8) + 45;
+# $city->{distance} = travelTime($targetCity->island->x, $targetCity->island->y, $city->{island}->{x}, $city->{island}->{y}, 8) + 45;
+$city->{distance} = travelTime($targetCity->island->x, $targetCity->island->y, $city->{island}->{x}, $city->{island}->{y}, 8) + 25;
 $city->{type} = "navy";
 push (@cities, $city);