oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Bulk tests for Session::Icon

Browse source 
Documented the disabled flag for moveDown and moveUp.  Only the EMS uses this in
the core as far as I can tell.
Optimized out 1 profile call in getBaseURL
This commit is contained in:
Colin Kuskie 2006-10-20 21:19:08 +00:00
parent d5be2abcf3
commit 6ad527c4a9
2 changed files with 213 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/WebGUI/Session/Icon.pm
View file

@ -63,8 +63,9 @@ Returns the base URL for this user's toolbar icon set.
sub getBaseURL {
my $self = shift;
my $url = $self->session->url->extras('toolbar/');
if ($self->session->user->profileField("toolbar") ne "useLanguageDefault") {
$url .= $self->session->user->profileField("toolbar");
my $toolbar = $self->session->user->profileField("toolbar");
if ($toolbar ne "useLanguageDefault") {
$url .= $toolbar;
} else {
$url .= WebGUI::International->new($self->session,'Icon')->getLanguage($self->session->user->profileField("language"),"toolbar");
}
@ -361,6 +362,10 @@ Any URL parameters that need to be tacked on to the current URL to accomplish wh
The URL to any page. Defaults to the current page.
=head3 disabled
If this flag is true, the icon will be generated but no action link will be wrapped around it.
=cut
sub moveDown {
@ -469,6 +474,10 @@ Any URL parameters that need to be tacked on to the current URL to accomplish wh
The URL to any page. Defaults to the current page.
=head3 disabled
If this flag is true, the icon will be generated but no action link will be wrapped around it.
=cut
sub moveUp {