From 36c9618cabfb99411be47b6af7e03a1c1fe5de81 Mon Sep 17 00:00:00 2001
From: John Salter <j.salter@leeds.ac.uk>
Date: Sat, 25 Jul 2020 22:40:37 +0100
Subject: [PATCH] Quash undef error when not using load_defaultcfg

Prevent this:
`Use of uninitialized value $dir in -e at /usr/share/eprints-ulcc/bin/../perl_lib/EPrints/Config.pm line 259`
when not using `load_defaultcfg` in EPrints::SystemSettings
---
 perl_lib/EPrints/Config.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl_lib/EPrints/Config.pm b/perl_lib/EPrints/Config.pm
index 98e6c1dc..87e53439 100644
--- a/perl_lib/EPrints/Config.pm
+++ b/perl_lib/EPrints/Config.pm
@@ -256,7 +256,7 @@ sub load_repository_config_module
 
 	foreach my $dir ( $libcfgd, $defaultcfg_cfgd, $site_lib_cfgd, $repcfgd )
 	{
-		next if( ! -e $dir );
+		next if( !defined $dir || ! -e $dir );
 		opendir( my $dh, $dir ) || EPrints::abort( "Can't read cfg.d config files from $dir: $!" );
 		while( my $file = readdir( $dh ) )
 		{