version 1.223, 2009/06/10 13:32:38
|
version 1.224, 2009/06/11 16:48:33
|
Line 2205 sub generate_menu {
|
Line 2205 sub generate_menu {
|
return $div->(join('', @categories), {class => "LC_columnSection"}); |
return $div->(join('', @categories), {class => "LC_columnSection"}); |
} |
} |
|
|
|
############################################## |
|
############################################## |
|
|
|
=pod |
|
|
|
=item &start_funclist |
|
|
|
Start list of available functions |
|
|
|
Typically used to offer a simple list of available functions |
|
at top or bottom of page. |
|
All available functions/actions for the current page |
|
should be included in this list. |
|
|
|
If the optional headline text is not provided, a default text will be used. |
|
|
|
|
|
Related routines: |
|
=over 4 |
|
add_item_funclist |
|
end_funclist |
|
=back |
|
|
|
|
|
Inputs: (optional) headline text |
|
|
|
Returns: HTML code with function list start |
|
|
|
=cut |
|
|
|
############################################## |
|
############################################## |
|
|
|
sub start_funclist { |
|
my($legendtext)=@_; |
|
$legendtext=&mt('Functions') if !$legendtext; |
|
return "<fieldset>\n<legend>$legendtext</legend>\n" |
|
.'<ul class="LC_funclist">'."\n"; |
|
} |
|
|
|
|
|
############################################## |
|
############################################## |
|
|
|
=pod |
|
|
|
=item &add_item_funclist |
|
|
|
Adds an item to the list of available functions |
|
|
|
Related routines: |
|
=over 4 |
|
start_funclist |
|
end_funclist |
|
=back |
|
|
|
Inputs: content item with text and link to function |
|
|
|
Returns: HTML code with list item for funclist |
|
|
|
=cut |
|
|
|
############################################## |
|
############################################## |
|
|
|
sub add_item_funclist { |
|
my($content) = @_; |
|
return '<li>'.$content.'</li>'."\n"; |
|
} |
|
|
|
############################################## |
|
############################################## |
|
|
|
=pod |
|
|
|
=item &end_funclist |
|
|
|
End list of available functions |
|
|
|
Related routines: |
|
=over 4 |
|
start_funclist |
|
add_item_funclist |
|
=back |
|
|
|
Inputs: ./. |
|
|
|
Returns: HTML code with function list end |
|
|
|
=cut |
|
|
|
############################################## |
|
############################################## |
|
|
|
sub end_funclist { |
|
my($r)=@_; |
|
return "</ul>\n</fieldset>\n"; |
|
} |
|
|
1; |
1; |
|
|
__END__ |
__END__ |