X-Git-Url: https://git.exim.org/exim.git/blobdiff_plain/7677a8673f89843326aab3944e608c6be4339039..3e82d28a25a0b58d4e3ca79db987aa8be35fd9a2:/src/src/exipick.src

diff --git a/src/src/exipick.src b/src/src/exipick.src
index 1672c7fe6..4999d843f 100644
--- a/src/src/exipick.src
+++ b/src/src/exipick.src
@@ -12,6 +12,7 @@ my $charset = 'ISO-8859-1';
 #       http://www.exim.org/eximwiki/ToolExipickManPage
 
 use strict;
+BEGIN { pop @INC if $INC[-1] eq '.' };
 use Getopt::Long;
 
 my($p_name)   = $0 =~ m|/?([^/]+)$|;