(minor) make htpasswd use md5 passwords

(thanks to yoonique dot net at gmail; he also tested that files with
some normal and some md5 passwords, such as would happen on an upgrade,
work fine)
This commit is contained in:
Sitaram Chamarty 2011-05-24 06:30:55 +05:30
parent fe53e778c9
commit 3d9b4fae9f

View file

@ -1151,7 +1151,7 @@ EOFhtp
my $password = <>; my $password = <>;
$password =~ s/[\n\r]*$//; $password =~ s/[\n\r]*$//;
die "empty passwords are not allowed\n" unless $password; die "empty passwords are not allowed\n" unless $password;
my $rc = system("htpasswd", "-b", $HTPASSWD_FILE, $ENV{GL_USER}, $password); my $rc = system("htpasswd", "-mb", $HTPASSWD_FILE, $ENV{GL_USER}, $password);
die "htpasswd command seems to have failed with $rc return code...\n" if $rc; die "htpasswd command seems to have failed with $rc return code...\n" if $rc;
} }