1
0
mirror of https://github.com/samba-team/samba.git synced 2025-03-27 22:50:26 +03:00

selftest: Cope with strict.

This commit is contained in:
Jelmer Vernooij 2010-04-12 16:11:31 +02:00
parent 9ef235ed0a
commit 9db207da07

View File

@ -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>;