1berry/webmin
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix join warning by converting undefs to empty strings

Browse Source
This commit is contained in:
Jamie Cameron 2014-12-29 09:44:42 -08:00
parent 72235d84a4
commit 8116d356cd
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
htaccess-htpasswd/htaccess-lib.pl
View File

@ -83,7 +83,8 @@ my $d;
my $fh = "DIRS"; my $fh = "DIRS";
&open_tempfile($fh, ">$directories_file"); &open_tempfile($fh, ">$directories_file");
foreach $d (@{$_[0]}) { foreach $d (@{$_[0]}) {
&print_tempfile($fh, join("\t", @$d),"\n"); my @safed = map { defined($_) ? $_ : "" } @$d;
&print_tempfile($fh, join("\t", @safed),"\n");
} }
&close_tempfile($fh); &close_tempfile($fh);
} }