apply patch from RT#102187
[catagits/Catalyst-Authentication-Store-Htpasswd.git] / lib / Catalyst / Authentication / Store / Htpasswd / User.pm
index 01693d7..f0d5eaa 100644 (file)
@@ -1,12 +1,14 @@
 #!/usr/bin/perl
 
 package Catalyst::Authentication::Store::Htpasswd::User;
+# ABSTRACT: A user object representing an entry in an htpasswd file.
+
 use base qw/Catalyst::Authentication::User Class::Accessor::Fast/;
 
 use strict;
 use warnings;
 
-our $VERSION = '1.005';
+our $VERSION = '1.006';
 
 BEGIN { __PACKAGE__->mk_accessors(qw/_user _store/) }
 
@@ -66,15 +68,10 @@ __END__
 
 =pod
 
-=head1 NAME
-
-Catalyst::Authentication::Store::Htpasswd::User - A user object
-representing an entry in an htpasswd file.
-
 =head1 DESCRIPTION
 
 This object wraps an L<Authen::Htpasswd::User> object. An instance of it will be returned
-by C<< $c->user >> when using L<Catalyst::Authentication::Store::Htpasswd>. Methods 
+by C<< $c->user >> when using L<Catalyst::Authentication::Store::Htpasswd>. Methods
 not defined in this module are passed through to the L<Authen::Htpasswd::User> object. The
 object stringifies to the username.
 
@@ -83,7 +80,7 @@ object stringifies to the username.
 =head2 new($store,$user)
 
 Creates a new object from a store object, normally an instance of 
-L<Catalyst::Authentication::Store::Htpasswd::Backend>, and a user object,
+L<Catalyst::Plugin::Authentication::Store::Htpasswd::Backend>, and a user object,
 normally an instance of L<Authen::Htpasswd::User>.
 
 =head2 id
@@ -111,20 +108,4 @@ Returns data about which featurs this user module supports.
 
 Returns the underlieing L<Authen::Htpasswd::User> object for this user
 
-=head1 AUTHORS
-
-Yuval Kogman C<nothingmuch@woobling.org>
-
-David Kamholz C<dkamholz@cpan.org>
-
-Tomas Doran C<bobtfish@bobtfish.net>
-
-=head1 COPYRIGHT & LICENSE
-
-       Copyright (c) 2005 the aforementioned authors. All rights
-       reserved. This program is free software; you can redistribute
-       it and/or modify it under the same terms as Perl itself.
-
 =cut
-
-