Mercurial > eagle-eye

diff Ikariam.pm @ 41:5849b6fdc76c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
removed my password from scripts.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Fri, 17 Oct 2008 01:27:10 +0800
parents 7d1e353520ca
children 96ee35378696
line wrap: on
line diff
--- a/Ikariam.pm	Thu Oct 16 21:44:05 2008 +0800
+++ b/Ikariam.pm	Fri Oct 17 01:27:10 2008 +0800
@@ -1,4 +1,8 @@
 #!/usr/bin/env perl
+BEGIN {
+    my $HOME = (getpwuid($<))[7] || $ENV{HOME} || $ENV{LOGDIR} || ".";
+    require "$HOME/.eagleeye.pm";
+}
 
 use Class::DBI::AutoLoader (
     dsn       => 'dbi:SQLite:dbname=ikariam.sqlite',