added getLabel method
This commit is contained in:
parent
39eb753e7e
commit
58df04b36c
3 changed files with 31 additions and 1 deletions
|
|
@ -19,6 +19,7 @@ use strict;
|
|||
use WebGUI::ProfileField;
|
||||
use WebGUI::Session;
|
||||
use WebGUI::SQL;
|
||||
use WebGUI::Operation::Shared;
|
||||
|
||||
|
||||
=head1 NAME
|
||||
|
|
@ -159,6 +160,19 @@ sub getId {
|
|||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 getLabel ()
|
||||
|
||||
Returns the eval'd label for this category.
|
||||
|
||||
=cut
|
||||
|
||||
sub getLabel {
|
||||
my $self = shift;
|
||||
return WebGUI::Operation::Shared::secureEval($self->get("label"));
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 moveDown ()
|
||||
|
||||
Moves this category down one position.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue