Mercurial > eagle-eye
diff scan.pl @ 295:15c288dd7dc5
checking spy risks
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Sun, 07 Dec 2008 15:10:14 +0800 |
parents | aaffc50e3318 |
children | 6ca0677a361e |
line wrap: on
line diff
--- a/scan.pl Fri Dec 05 20:22:20 2008 +0800 +++ b/scan.pl Sun Dec 07 15:10:14 2008 +0800 @@ -17,7 +17,6 @@ sub new { my($class, $i) = @_; - warn("new scanner"); my $self = { ikariam => $i, }; @@ -47,6 +46,8 @@ } else { $c = Ikariam::Cities->insert($h_city); } + + $c->set(risk => $self->{ikariam}->viewSendSpy($h_city->{cityId})); $c->update(); my $user = Ikariam::User->retrieve($h_city->{'user'});