diff enemy.pl @ 44:4f7bca0d6190

fixed typo.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Fri, 17 Oct 2008 02:57:46 +0800
parents 0863b32e1a05
children 4120f560f214
line wrap: on
line diff
--- a/enemy.pl	Fri Oct 17 01:33:52 2008 +0800
+++ b/enemy.pl	Fri Oct 17 02:57:46 2008 +0800
@@ -23,7 +23,7 @@
     # print Dumper($u->_data_hash);
     foreach my $city ($u->cities) {
         my $island = Ikariam::Island->retrieve($city->island);
-        my $robbery = $city->citylevel * ($city->citylevel - 1) * $u->trader_score_secondary / 10000;
+        my $capture = $city->citylevel * ($city->citylevel - 1) * $u->trader_score_secondary / 10000;
 
         printf("Name: %s\n", $city->cityname);
         if(defined($city->status))
@@ -36,7 +36,7 @@
             $island->x, $island->y, $island->id, $city->cityId);
         printf("Tradegood: %s\n", $tradegoodText[$island->tradegood]);
         printf("Wonder: %s\n", $wonderText[$island->wonder]);
-        printf("Robbery score: %d\n\n", $robbery);
+        printf("capture score: %d\n\n", $capture);
         # print Dumper($island->_data_hash);
         # print Dumper($city->_data_hash);
     }