# HG changeset patch
# User "Rex Tsai <chihchun@kalug.linux.org.tw>"
# Date 1224500794 -28800
# Node ID ec5bc0f68e68a7f094d7794ce23ce94c0a91f1dd
# Parent  7f935bdc01b6eaf79738d52ddd15fba7882ef0a0# Parent  f2065bdcaeb37b532932dcca3dbb56e2ece66f96
removed the unused file.

diff -r f2065bdcaeb3 -r ec5bc0f68e68 .hgignore
--- a/.hgignore	Sat Oct 18 22:21:42 2008 +0800
+++ b/.hgignore	Mon Oct 20 19:06:34 2008 +0800
@@ -1,10 +1,9 @@
 syntax: glob
-cookies.txt
+.eagleeye.pm
+.hgignore
 ikariam.sqlite
 perl
 samples
-sheep.sh
-sheep.txt
 *.html
 *.sh
 *.txt
diff -r f2065bdcaeb3 -r ec5bc0f68e68 Ikariam.pm
--- a/Ikariam.pm	Sat Oct 18 22:21:42 2008 +0800
+++ b/Ikariam.pm	Mon Oct 20 19:06:34 2008 +0800
@@ -1,7 +1,8 @@
 #!/usr/bin/env perl
 BEGIN {
-    my $HOME = (getpwuid($<))[7] || $ENV{HOME} || $ENV{LOGDIR} || ".";
-    require "$HOME/.eagleeye.pm";
+    foreach (((getpwuid($<))[7], $ENV{HOME}, $ENV{LOGDIR}, ".")) {
+        require "$_/.eagleeye.pm" if (-f "$_/.eagleeye.pm");
+    }
 }
 
 use Class::DBI::AutoLoader (
diff -r f2065bdcaeb3 -r ec5bc0f68e68 nopaste
Binary file nopaste has changed
diff -r f2065bdcaeb3 -r ec5bc0f68e68 scan.pl
--- a/scan.pl	Sat Oct 18 22:21:42 2008 +0800
+++ b/scan.pl	Mon Oct 20 19:06:34 2008 +0800
@@ -8,7 +8,10 @@
 {
     my ($island, @cities) = @_;
 
-    die ("empty cities list.\n") if ($#cities == -1);
+    if ($#cities == -1) {
+        warn ("empty cities list.\n");
+        return;
+    }
 
     foreach my $city (@cities)
     {