diff Ikariam.pm @ 104:b369fe3c1992

fixed typo and war counting
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Wed, 29 Oct 2008 15:08:34 +0800
parents 592d3b3b7898
children 31803acb9c5f
line wrap: on
line diff
--- a/Ikariam.pm	Wed Oct 29 12:34:18 2008 +0800
+++ b/Ikariam.pm	Wed Oct 29 15:08:34 2008 +0800
@@ -512,8 +512,8 @@
         my $result = $extractor->{doc}->find(sprintf('//div[@id="%s"]//ul[@id="battleReports"]/li[@class="enroute"]', $_));
         foreach my $div ( @$result ) {
             my $extractor = new Ikariam::Extractor(content => $div->toString(1));
-            my $f = $extractor->find('//div[@class="report"]/a[1]/@href');
-            my $t = $extractor->find('//div[@class="report"]/a[2]/@href'),
+            my $t = $extractor->find('//div[@class="report"]/a[1]/@href');
+            my $f = $extractor->find('//div[@class="report"]/a[2]/@href');
             $f = $1 if($f =~ /\?view=island&cityId=(\d+)/);
             $t = $1 if($t =~ /\?view=island&cityId=(\d+)/);