Mercurial > eagle-eye

comparison Ikariam.pm @ 148:b23077d597b0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sat, 01 Nov 2008 01:34:39 +0800
parents 7f9109a50679 aad08889ddb3
children fab1593cadf1
comparison
equal deleted inserted replaced
147:7f9109a50679 148:b23077d597b0
579 579
580 $report{targetCity} = $extractor->find('//div[@id="troopsReport"]/div/h3/a/text()'); 580 $report{targetCity} = $extractor->find('//div[@id="troopsReport"]/div/h3/a/text()');
581 my $href = $extractor->find('//div[@id="troopsReport"]/div/h3/a/@href'); 581 my $href = $extractor->find('//div[@id="troopsReport"]/div/h3/a/@href');
582 # $report{targetCity} = $extractor->find('//td[@class="battle"]/a/text()'); 582 # $report{targetCity} = $extractor->find('//td[@class="battle"]/a/text()');
583 # my $href = $extractor->find('//td[@class="battle"]/a/@href'); 583 # my $href = $extractor->find('//td[@class="battle"]/a/@href');
584
584 if($href =~ /index\.php\?view=island&id=(\d+)&selectCity=(\d+)/) { 585 if($href =~ /index\.php\?view=island&id=(\d+)&selectCity=(\d+)/) {
585 $report{island} = $1; 586 $report{island} = $1;
586 $report{city} = $2; 587 $report{city} = $2;
587 } else { 588 } else {
588 warn ("can not read combat reprot $combatId"); 589 warn ("can not read combat reprot $combatId");