sub new {
my ( $class, $store, $user ) = @_;
+ return unless $user;
+
bless { store => $store, user => $user }, $class;
}
Returns an array of roles, which is extracted from a comma-separated list in the
third field of the htpasswd file.
-=head1 COPYRIGHT & LICNESE
+=head1 COPYRIGHT & LICENSE
Copyright (c) 2005 the aforementioned authors. All rights
reserved. This program is free software; you can redistribute