X-Git-Url: https://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=perlmail-submit;h=c7fe19fd9a69788e6ae170ecbfea3a3f9172d631;hp=6879f3d9fb2c62b1327f8c3917c37beba3509f84;hb=9d03569bd26dfb0f54f21063445fc9d28ed1c4d3;hpb=c23c7da69d6fabcd20481ca42cfe551626bfbcc5 diff --git a/perlmail-submit b/perlmail-submit index 6879f3d..c7fe19f 100755 --- a/perlmail-submit +++ b/perlmail-submit @@ -7,7 +7,11 @@ $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; }; use strict; use warnings; -use PerlMail::Config; +use File::Basename; +BEGIN { + use lib $ENV{"PERLMAIL_BASEDIR"} || File::Basename::dirname($0); + use PerlMail::Config; + } use Getopt::Long; use DBI;