Mercurial > eagle-eye

comparison warfare.pl @ 197:dbdd7dcc91c6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed for friendly troop and corruption
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Mon, 03 Nov 2008 03:17:43 +0800
parents 8afd380c20ac
children d9f17bcbf1f1
comparison
equal deleted inserted replaced
196:ad88b3c92383 197:dbdd7dcc91c6
141 our $rules = Ikariam::Warfare::Rules->new($i); 141 our $rules = Ikariam::Warfare::Rules->new($i);
142 142
143 $i->login; 143 $i->login;
144 my $cities = $i->check; 144 my $cities = $i->check;
145 $i->checkMilitaryAdvisorCombatReports(); 145 $i->checkMilitaryAdvisorCombatReports();
146 $i->checkFriends();
146 147
147 foreach my $cityId (keys(%$cities)) { 148 foreach my $cityId (keys(%$cities)) {
148 print Dump($i->{'military'}); 149 print Dump($i->{'military'});
149 # build and upgrade for cities 150 # build and upgrade for cities
150 my $tree = LoadFile('warfare.yaml'); 151 my $tree = LoadFile('warfare.yaml');