lib/Ius/Dav/Htpasswd.pm
branchfoerste
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) {