X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=base%2Flib%2FText%2FTradition%2FUser.pm;h=2883246b6e895a4f9d13543addea810b6ed69a04;hb=a445ce40b95a497a8a6f5276e0933d158d392443;hp=868c25b880e79ff9c6f3a2edcad9cf19196ccc18;hpb=951ddfe8781b6111653ed8074488e5ddb65178f7;p=scpubgit%2Fstemmatology.git diff --git a/base/lib/Text/Tradition/User.pm b/base/lib/Text/Tradition/User.pm index 868c25b..2883246 100644 --- a/base/lib/Text/Tradition/User.pm +++ b/base/lib/Text/Tradition/User.pm @@ -61,9 +61,9 @@ Text::Tradition::User - Users which own traditions, and can login to the web app =head1 SYNOPSIS - ## Users are managed by Text::Tradition::UserStore + ## Users are managed by Text::Tradition::Directory - my $userstore = Text::Tradition::UserStore->new(dsn => 'dbi:SQLite:foo.db'); + my $userstore = Text::Tradition::Directory->new(dsn => 'dbi:SQLite:foo.db'); my $newuser = $userstore->add_user({ username => 'fred', password => 'somepassword' }); @@ -105,10 +105,24 @@ L. Returns an ArrayRef of L objects belonging to this user. -=head2 METHODS +=head1 METHODS -=head3 check_password +=head2 check_password Inherited from KiokuX::User, verifies a given password string against the stored encrypted version. +=head2 add_tradition( $tradition ) + +Assigns the given tradition to this user. + +=head2 remove_tradition( $tradition ) + +Removes the specified tradition from the control of this user. + +=head2 is_admin + +Returns true if this user has administrative privileges. + + +