Mercurial > eagle-eye

diff enemy.pl @ 20:5635e75c92d0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
the user profile is also cached for 1 hour.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Wed, 08 Oct 2008 16:56:22 +0800
parents fd44e3a1f800
children dd85b55eec2a
line wrap: on
line diff
--- a/enemy.pl	Wed Oct 08 16:22:54 2008 +0800
+++ b/enemy.pl	Wed Oct 08 16:56:22 2008 +0800
@@ -22,6 +22,10 @@
     foreach my $city ($u->cities) {
         my $island = Ikariam::Island->retrieve($city->island);
         printf("Name: %s\n", $city->cityname);
+        if(defined($city->status))
+        {
+            printf("Status: <<<%s>>>\n", $city->status);
+        }
         printf("Level: %s\n", $city->citylevel);
         printf("Island: %s\n", $island->name);
         printf("Location: [%s:%s] http://s2.ikariam.tw/index.php?view=island&id=%s\n", $island->x, $island->y, $island->id);