From ca5f4e21357a0b4a55e7a2a0f71e632442723989 Mon Sep 17 00:00:00 2001
From: Fabian Keil <fk@fabiankeil.de>
Date: Wed, 14 Nov 2012 11:40:31 +0100
Subject: runtests and friends: Do not add undefined values to @INC

On FreeBSD this fixes the warning:
Use of uninitialized value $p in string eq at /usr/local/lib/perl5/5.14.2/BSDPAN/BSDPAN.pm line 36.
---
 tests/keywords.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'tests/keywords.pl')

diff --git a/tests/keywords.pl b/tests/keywords.pl
index 523bde1fc..28646ad00 100755
--- a/tests/keywords.pl
+++ b/tests/keywords.pl
@@ -23,7 +23,8 @@
 
 use strict;
 
-@INC=(@INC, $ENV{'srcdir'}, ".");
+push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
+push(@INC, ".");
 
 require "getpart.pm"; # array functions
 
-- 
cgit v1.2.3