branch | foerste |
changeset 50 | 24c400b32505 |
parent 46 | 48216cf584d0 |
child 51 | 0551002b6228 |
--- a/lib/Ius/Dav/Htpasswd.pm Wed Jul 20 11:38:40 2011 +0200 +++ b/lib/Ius/Dav/Htpasswd.pm Wed Jul 20 11:49:23 2011 +0200 @@ -201,8 +201,8 @@ my $htpasswd_file = $conf->{htpasswd}; my $htpasswd = new Apache::Htpasswd $htpasswd_file; - my @users = $htpasswd->fetchUsers - or die "Can't fetch htuser list: ", $htpasswd->error; + # empty @users does not indicate failure + my @users = $htpasswd->fetchUsers; my $now = time; for my $u (@users) {