# HG changeset patch
# User "Rex Tsai <chihchun@kalug.linux.org.tw>"
# Date 1226852756 -28800
# Node ID c30080146c050d46b1628de6ab8ade15790683d9
# Parent  fd6c3660cd3815dde57dbc6e433331801e632241
fixed the sheep.pl for ignore user without ally

diff -r fd6c3660cd38 -r c30080146c05 sheep.pl
--- a/sheep.pl	Fri Nov 14 02:05:48 2008 +0800
+++ b/sheep.pl	Mon Nov 17 00:25:56 2008 +0800
@@ -59,6 +59,7 @@
                 unless ($sheep->allyId == '0') {
                     unless (!defined($sheep->allyId) || $sheep->allyId == 0) {
                         my $ally = Ikariam::Ally->retrieve($sheep->allyId);
+                        next if(!defined($ally));
                         next if($ally->score > $myAlly->score);
                     }
                 }