Mercurial > eagle-eye

diff Ikariam.pm @ 106:31803acb9c5f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed typo again
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Wed, 29 Oct 2008 15:14:58 +0800
parents b369fe3c1992
children 279a000eb3b0
line wrap: on
line diff
--- a/Ikariam.pm	Wed Oct 29 15:11:24 2008 +0800
+++ b/Ikariam.pm	Wed Oct 29 15:14:58 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 $t = $extractor->find('//div[@class="report"]/a[1]/@href');
-            my $f = $extractor->find('//div[@class="report"]/a[2]/@href');
+            my $f = $extractor->find('//div[@class="report"]/a[1]/@href');
+            my $t = $extractor->find('//div[@class="report"]/a[2]/@href');
             $f = $1 if($f =~ /\?view=island&cityId=(\d+)/);
             $t = $1 if($t =~ /\?view=island&cityId=(\d+)/);