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 08e1db78599691af345009f51da544dc2b7ba317..5b1e6ffe17dede535634d8a8972ffadc8f55c789 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);