X-Git-Url: https://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=perlmail-sendmail;h=2177e2ce62738bd3eea7bf2ab6ac811be8750d72;hp=276e3ddb44d70f9408cc3d96d609022ff835081e;hb=0c848de6fd9c35f1ec9640b3adbab036ce0a5a91;hpb=e19b6c0e412149c689a0e09deb410911b0b1d6a3 diff --git a/perlmail-sendmail b/perlmail-sendmail index 276e3dd..2177e2c 100755 --- a/perlmail-sendmail +++ b/perlmail-sendmail @@ -24,11 +24,12 @@ use strict; use warnings; use File::Basename; +use File::Spec::Link; BEGIN { - use lib $ENV{"PERLMAIL_BASEDIR"} || File::Basename::dirname($0); - use PerlMail::Config; - use PerlMail::Lib; + eval 'use lib $ENV{"PERLMAIL_BASEDIR"} || File::Basename::dirname(File::Spec::Link->resolve($0));'; } +use PerlMail::Config; +use PerlMail::Lib; require Getopt::Long; use POSIX qw(WIFEXITED WEXITSTATUS WIFSIGNALED WTERMSIG WIFSTOPPED WSTOPSIG);