Fix oversight in find_directory
authorJacob Bachmeyer <jcb@gnu.org>
Wed, 2 Nov 2022 04:52:36 +0000 (23:52 -0500)
committerJacob Bachmeyer <jcb@gnu.org>
Wed, 2 Nov 2022 04:52:36 +0000 (23:52 -0500)
An empty "directory" element would cause a warning from perl due to the
first element in the @values array being undefined.

gatekeeper.pl

index 9d301d7de8eb087e1deb579e475e0eed7fb3c2f8..9a4427e2329cb060a4ee5fe12e46c0c6c163ce45 100755 (executable)
@@ -1357,6 +1357,8 @@ sub find_directory {
     if scalar @values > 1;
   die "no directory directive specified"
     unless @values;
+  die "invalid directory element with no value"
+    unless $values[0];
 
   die "invalid directory $values[0]"
     unless $values[0] =~ m/^($RE_filename_relative)$/;