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

fixed set detection

Browse source
This commit is contained in:
JT Smith 2009-10-22 22:03:37 -05:00
parent 38c7c8515b
commit 509c2d64ee
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Asset.pm
View file

@ -503,7 +503,7 @@ If specified, stores it, but also updates extraHeadTagsPacked with the packed ve
sub extraHeadTags { sub extraHeadTags {
my ( $self, $unpacked ) = @_; my ( $self, $unpacked ) = @_;
if (scalar(@_) > 1) { if (@_ > 1) {
my $packed = $unpacked; my $packed = $unpacked;
HTML::Packer::minify( \$packed, { HTML::Packer::minify( \$packed, {
remove_comments => 1, remove_comments => 1,
@ -1480,7 +1480,7 @@ If specified this value will be used to set the title after it goes through some
sub menuTitle { sub menuTitle {
my ($self, $title) = @_; my ($self, $title) = @_;
if (defined $title) { if (@_ > 1) {
if ($title eq "") { if ($title eq "") {
$title = $self->title; $title = $self->title;
} }
@ -2187,7 +2187,7 @@ If specified this value will be used to set the title after it goes through some
sub title { sub title {
my ($self, $title) = @_; my ($self, $title) = @_;
if (defined $title) { if (@_ > 1) {
if ($title eq "") { if ($title eq "") {
$title = 'Untitled'; $title = 'Untitled';
} }
@ -2323,7 +2323,7 @@ The new value to set the URL to.
sub url { sub url {
my ($self, $url) = @_; my ($self, $url) = @_;
if (defined $url) { if (@_ > 1) {
$url = $self->fixUrl($url); $url = $self->fixUrl($url);
} }
return $self->next::method($url); return $self->next::method($url);