Mercurial > eagle-eye

comparison enemy.pl @ 302:efffa408eec5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refined the output of spy information
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sun, 07 Dec 2008 22:25:52 +0800
parents 986a75252cb3
children 2ca2c4c49901 c4ef89a74128
comparison
equal deleted inserted replaced
301:07f51bb67e56 302:efffa408eec5
113 printf("Location: [%s:%s] http://%s/index.php?view=island&id=%s&selectCity=%d\n", 113 printf("Location: [%s:%s] http://%s/index.php?view=island&id=%s&selectCity=%d\n",
114 $island->x, $island->y, $::server, $island->id, $city->cityId); 114 $island->x, $island->y, $::server, $island->id, $city->cityId);
115 if(-f sprintf("spy-%d-dump.yaml", $city->cityId)) { 115 if(-f sprintf("spy-%d-dump.yaml", $city->cityId)) {
116 my $spydata = LoadFile(sprintf("spy-%d-dump.yaml", $city->cityId)); 116 my $spydata = LoadFile(sprintf("spy-%d-dump.yaml", $city->cityId));
117 if($spydata->{city}->{buildings}->{townHall} ne $city->citylevel) { 117 if($spydata->{city}->{buildings}->{townHall} ne $city->citylevel) {
118 printf("*OUTDATED* "); 118 printf("Hall: %s", $city->citylevel);
119 printf("\n*OUTDATED* ");
119 } 120 }
120 printf("Hall: %s, Wall: %s, Port: %s, Safehouse: %s, Risk: %s\n", 121 printf("Hall: %s, Wall: %s, Port: %s, Safehouse: %s, Risk: %s\n",
121 $spydata->{city}->{buildings}->{townHall}, 122 $spydata->{city}->{buildings}->{townHall},
122 $spydata->{city}->{buildings}->{wall}, 123 $spydata->{city}->{buildings}->{wall},
123 $spydata->{city}->{buildings}->{port}, 124 $spydata->{city}->{buildings}->{port},