diff agent.pl @ 80:7ab5fc8c847c

added some memo of TODO
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Fri, 24 Oct 2008 21:56:03 +0800
parents 9d92e8c12f58
children d57920014cb4
line wrap: on
line diff
--- a/agent.pl	Fri Oct 24 21:46:33 2008 +0800
+++ b/agent.pl	Fri Oct 24 21:56:03 2008 +0800
@@ -19,7 +19,9 @@
 sub is_attacked {
     my ($self, $city) = @_;
     # XXX
-    return ($city->{wars}->{attacks} > 0 ) ? 1 : 0;
+    # $self->{'military'}->{wars}->{attacks}
+    # return ($city->{wars}->{attacks} > 0 ) ? 1 : 0;
+    return 0;
 }
 
 sub is_constructing {