# HG changeset patch
# User "Rex Tsai <chihchun@kalug.linux.org.tw>"
# Date 1235877010 -28800
# Node ID 7274d8f41d5f2630aaf3878fb4fd380e7d76ea7a
# Parent  3b2658751efa349d4a65ca74828c0033457b63d4
refined the timing for sending ships

diff -r 3b2658751efa -r 7274d8f41d5f disturb.pl
--- a/disturb.pl	Sun Mar 01 11:09:44 2009 +0800
+++ b/disturb.pl	Sun Mar 01 11:10:10 2009 +0800
@@ -7,6 +7,7 @@
 
 if($#ARGV != 2) { die("Usage: $0 blockadeCity myCity travelTime\n"); }
 my ($blockadeCity, $myCity, $travelTime) = @ARGV;
+$travelTime = ($travelTime - 10);
 
 LOOP: while(1) {
     $ikariam->login;