POD for four more files
This commit is contained in:
parent
8a86fea5f0
commit
0b02edaea5
4 changed files with 187 additions and 0 deletions
|
|
@ -15,6 +15,20 @@ use strict;
|
|||
use WebGUI::International;
|
||||
use Safe;
|
||||
|
||||
=head1 NAME
|
||||
|
||||
Package WebGUI::Operation::Shared
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Shared routines for WebGUI Operations.
|
||||
|
||||
=head2 accountOptions ( $session )
|
||||
|
||||
Copies the requested database link in the form variable C<dlid> if the user
|
||||
is in group Admin (3). Returns the user to the List Database Links screen.
|
||||
|
||||
=cut
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
sub accountOptions {
|
||||
|
|
@ -66,6 +80,14 @@ use Safe;
|
|||
}
|
||||
|
||||
|
||||
=head2 secureEval ( $session, $code )
|
||||
|
||||
Eval $code inside of a Safe compartment to prevent sneaky attacks, mainly for use with
|
||||
the Profile system, where internationalized labels are stored as perl code inside
|
||||
the database.
|
||||
|
||||
=cut
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
# This function is here to replace the dangerous eval calls in the User Profile System.
|
||||
sub secureEval {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue