Mercurial > eagle-eye

diff agent.pl @ 150:fab1593cadf1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed the combat reading issue.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sat, 01 Nov 2008 03:52:09 +0800
parents 9fb18f3d6e26
children 7071116f6ae7
line wrap: on
line diff
--- a/agent.pl	Sat Nov 01 02:01:53 2008 +0800
+++ b/agent.pl	Sat Nov 01 03:52:09 2008 +0800
@@ -20,10 +20,6 @@
 
 sub is_attacked {
     my ($self, $city) = @_;
-    if($self->{'ikariam'}->{'military'}->{attacks} > 0) {
-        # notify youself.
-        system('zenity --warning  --title="Ikariam" --text="You are attacked"');
-    }
 
     return ($self->{'ikariam'}->{'military'}->{attacks} > 0 ) ? 1 : 0;
 }
@@ -292,7 +288,9 @@
     # print(Dump($cities->{$cityId}->{parse_path})) if(defined($verbose));
 }
 # print(Dump($cities)) if(defined($verbose));
-DumpFile("dump.yaml", $cities);
+DumpFile("cities-dump.yaml", $cities);
+DumpFile("research-dump.yaml", $i->{'research'});
+DumpFile("military-dump.yaml", $i->{'military'});
 
 $i->logout;