Mercurial > eagle-eye

changeset 278:b2510d9339d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed warehouse level
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Tue, 02 Dec 2008 17:11:39 +0800
parents cea21f99e56f
children a9847bf80058
files agent.pl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/agent.pl	Tue Dec 02 16:40:53 2008 +0800
+++ b/agent.pl	Tue Dec 02 17:11:39 2008 +0800
@@ -84,7 +84,7 @@
 sub is_warehouse_enough {
     my ($self, $city) = @_;
     # my @warehouse = (qw/undef undef 0 4 9 16 18 19 20 21 22 23 24 25/);
-    my @warehouse = (qw/undef undef 0 4 9 15 17 19 20 21 22 23 24 25/);
+    my @warehouse = (qw/undef undef 0 4 9 15 17 18 19 20 21 22 23 24/);
     my @cities = keys(%{$self->{ikariam}->{cities}});
     my $nextCities = ($#cities + 1) + 1;