# HG changeset patch
# User "Rex Tsai <chihchun@kalug.linux.org.tw>"
# Date 1225213384 -28800
# Node ID 65c1021834587937e8a19f62070a003ce379b7b9
# Parent  6527b4b20d60a52b38e2bba2431597f86d1e4180
saved the status of inactivity player

diff -r 6527b4b20d60 -r 65c102183458 Ikariam.pm
--- a/Ikariam.pm	Mon Oct 27 12:14:11 2008 +0800
+++ b/Ikariam.pm	Wed Oct 29 01:03:04 2008 +0800
@@ -91,7 +91,7 @@
 use Data::Dumper;
 use LWP;
 # use LWP::Debug qw(+ -conns -trace -debug);
-use LWP::Debug qw(+trace);
+# use LWP::Debug qw(+trace);
 use HTTP::Cookies;
 use WWW::Mechanize;
 use HTML::TagParser;
@@ -296,6 +296,9 @@
             if(defined(($extractor->find(sprintf('//li[@id="cityLocation%s"]//span[@class="vacation"]', $i)))[0])) {
                 $info{'status'} = 'v';
             }
+            if(defined(($extractor->find(sprintf('//li[@id="cityLocation%s"]//span[@class="inactivity"]', $i)))[0])) {
+                $info{'status'} = 'i';
+            }
             push @cities, \%info;
         } else {
             # TODO: delete the old city.