From 4d3d955f2791199b35704c3e9784dc99fd229696 Mon Sep 17 00:00:00 2001
From: Phil Pennock <pdp@exim.org>
Date: Fri, 10 Feb 2017 19:37:44 -0500
Subject: perl paranoia about @INC

---
 src/util/mkcdb.pl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/util/mkcdb.pl')

diff --git a/src/util/mkcdb.pl b/src/util/mkcdb.pl
index 16827c63b..691849dcd 100755
--- a/src/util/mkcdb.pl
+++ b/src/util/mkcdb.pl
@@ -15,6 +15,7 @@
 
 use strict;
 
+BEGIN { pop @INC if $INC[-1] eq '.' };
 $ENV{'PATH'} = "";
 umask(022);
 
-- 
cgit v1.2.3