Mercurial > eagle-eye

changeset 241:64549ddddf4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
count by ally score
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Fri, 07 Nov 2008 15:18:23 +0800
parents 937fc672df56
children 5f6f845bbb1d
files sheep.pl warfare.pl
diffstat 2 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/sheep.pl	Fri Nov 07 15:01:11 2008 +0800
+++ b/sheep.pl	Fri Nov 07 15:18:23 2008 +0800
@@ -49,7 +49,6 @@
         # avoid duplicate
         next if($sheep->id == $s); $s = $sheep->id;
 
-
         foreach my $c ($sheep->cities) {
             my $line = "";
             # Ignore 假期模式
--- a/warfare.pl	Fri Nov 07 15:01:11 2008 +0800
+++ b/warfare.pl	Fri Nov 07 15:18:23 2008 +0800
@@ -94,10 +94,11 @@
         next if($city->status eq 'v');
         unless ($city->status eq 'i') {
             unless (!defined($sheep->allyId) || $sheep->allyId == 0) {
-                my $ally = Ikariam::Ally->retrieve($sheep->allyId);
-                # Ignore the ally which have more then 10 members. 
+                my $ally = Ikariam::Ally->retrieve($user->allyId);
+                my $targetAlly = Ikariam::Ally->retrieve($sheep->allyId);
                 # We don't want to piss off the big team.
-                next if(defined($ally) && $ally->members > 10);
+                next if($targetAlly->score > $ally->score);
+                # next if(defined($ally) && $ally->members > 10);
             }
         }