Bug 418672: Make email_in.pl chdir to the abs_path to avoid working from /etc/smrsh...

Patch by Marques Johansson <bugzilla@displague.com> r=mkanat, a=mkanat

diff --git a/email_in.pl b/email_in.pl
index 1f9a958c88989b1ae45a09889ed09034d8b5ccc2..f06dd0e31ce1dc6daec6f25d6134d83d0107d25c 100644 (file)
--- a/email_in.pl
+++ b/email_in.pl
@@ -24,10 +24,9 @@ use warnings;
 
 # MTAs may call this script from any directory, but it should always
 # run from this one so that it can find its modules.
-BEGIN {
-    require File::Basename;
-    chdir(File::Basename::dirname($0)); 
-}
+use Cwd qw(abs_path);
+use File::Basename qw(dirname);
+BEGIN { chdir dirname(abs_path($0)); }
 
 use lib qw(. lib);