From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 25 Oct 2015 13:19:26 +0000 (+0000)
Subject: srcdump: Skip undef entries in srcdump_dirscan_prepare (relevant if SCRIPT_FILENAME... 
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=cgi-auth-flexible.git;a=commitdiff_plain;h=0704efd691abd3aa156ab6295f6d98e5d7b1a506;ds=sidebyside

srcdump: Skip undef entries in srcdump_dirscan_prepare (relevant if SCRIPT_FILENAME is undef, for example
---

diff --git a/cgi-auth-flexible.pm b/cgi-auth-flexible.pm
index 284a23d..6a3bb9d 100644
--- a/cgi-auth-flexible.pm
+++ b/cgi-auth-flexible.pm
@@ -353,6 +353,7 @@ sub srcdump_dirscan_prepare ($$) {
     };
     my %dirsdone;
     foreach my $item ($v->_ch('srcdump_listitems')) {
+	next unless defined $item;
 	if ($item eq '.' && $v->{S}{srcdump_filter_cwd}) {
 	    my @bad = grep { !m#^/# } values %INC;
 	    die "filtering . from srcdump items and \@INC but already".