diff options
| -rwxr-xr-x | selftest/selftest.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/selftest/selftest.pl b/selftest/selftest.pl index 7bc14b12cb..aa3d79c5d7 100755 --- a/selftest/selftest.pl +++ b/selftest/selftest.pl @@ -641,7 +641,7 @@ sub read_testlist($) while (<IN>) { if (/-- TEST(-LOADLIST)? --\n/) { - my $supports_loadlist = ($1 eq "-LOADLIST"); + my $supports_loadlist = (defined($1) and $1 eq "-LOADLIST"); my $name = <IN>; $name =~ s/\n//g; my $env = <IN>; |