# HG changeset patch # User "Rex Tsai " # Date 1225782780 -28800 # Node ID f6836ef112037d9acbf0d6586bf93a21a46ec217 # Parent 5f94d8d8370a5a8e5db439549e8a2615fe954438 fixed a typo. diff -r 5f94d8d8370a -r f6836ef11203 agent.pl --- a/agent.pl Tue Nov 04 01:14:39 2008 +0800 +++ b/agent.pl Tue Nov 04 15:13:00 2008 +0800 @@ -62,8 +62,8 @@ sub is_safehouse_enough { my ($self, $city) = @_; - return 0 if(!defined($city->{building}->{safehouse})); - return (($city->{building}->{townHall} <= ($city->{building}->{safehouse} + 4)) ? 0 : 1); + return 0 if(!defined($city->{buildings}->{safehouse})); + return (($city->{buildings}->{townHall} <= ($city->{buildings}->{safehouse} + 4)) ? 0 : 1); } sub is_warehouse_enough {