diff --git a/htaccess-htpasswd/htaccess-lib.pl b/htaccess-htpasswd/htaccess-lib.pl
index fb6c7c859..c6bfc9e48 100755
--- a/htaccess-htpasswd/htaccess-lib.pl
+++ b/htaccess-htpasswd/htaccess-lib.pl
@@ -83,7 +83,8 @@ my $d;
 my $fh = "DIRS";
 &open_tempfile($fh, ">$directories_file");
 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);
 }