Mercurial > eagle-eye

diff warfare.pl @ 205:d9f17bcbf1f1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
we keep 10 transporters for prize
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Mon, 03 Nov 2008 17:20:51 +0800
parents dbdd7dcc91c6
children 31fca1e55ed5
line wrap: on
line diff
--- a/warfare.pl	Mon Nov 03 17:02:07 2008 +0800
+++ b/warfare.pl	Mon Nov 03 17:20:51 2008 +0800
@@ -50,7 +50,8 @@
 
 sub is_transporters_available {
     my ($self, $city) = @_;
-    return ($city->{transporters}->{avail} > 0) ? 1 : 0;
+    # we keep 10 transporters for prize
+    return ($city->{transporters}->{avail} > 10) ? 1 : 0;
 }
 
 sub is_port_available {