Add POD to 1 Asset and 7 Operations.
Internationalized a label in Operation::LoginHistory
This commit is contained in:
parent
c02a3019c2
commit
4206828715
9 changed files with 256 additions and 1 deletions
|
|
@ -49,6 +49,16 @@ sub getInstance {
|
|||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 www_auth ( )
|
||||
|
||||
This subroutine does authentication dispatch. It looks up the authentication method for
|
||||
the current user, makes sure that it supports the operation that has been requested,
|
||||
and then executes it. If an illegal method was requested, then an error message
|
||||
is returned.
|
||||
|
||||
=cut
|
||||
|
||||
sub www_auth {
|
||||
my $auth;
|
||||
($auth) = WebGUI::SQL->quickArray("select authMethod from users where username=".quote($session{form}{username})) if($session{form}{username});
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue