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

couple of bug fixes

Browse source
This commit is contained in:
JT Smith 2004-12-25 20:50:24 +00:00
parent c8b30d5493
commit bc2d6a258e
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Asset.pm
View file

@ -280,8 +280,8 @@ sub getEditForm {
-uiLevel=>3 -uiLevel=>3
); );
$tabform->getTab("properties")->yesNo( $tabform->getTab("properties")->yesNo(
-name=>"hideFromNavigation", -name=>"isHidden",
-value=>$self->get("hideFromNavigation"), -value=>$self->get("isHidden"),
-label=>WebGUI::International::get(886), -label=>WebGUI::International::get(886),
-uiLevel=>6 -uiLevel=>6
); );
@ -775,7 +775,7 @@ sub www_add {
groupIdEdit => $self->get("groupIdEdit"), groupIdEdit => $self->get("groupIdEdit"),
ownerId => $self->get("ownerId"), ownerId => $self->get("ownerId"),
encryptPage => $self->get("encryptPage"), encryptPage => $self->get("encryptPage"),
hideFromNavigation => $self->get("hideFromNavigation"), isHidden => $self->get("isHidden"),
startDate => $self->get("startDate"), startDate => $self->get("startDate"),
endDate => $self->get("endDate") endDate => $self->get("endDate")
); );

2
lib/WebGUI/Asset/FilePile.pm
View file

@ -182,7 +182,7 @@ sub editSave {
$storage->addFileFromFilesystem($tempStorage->getPath($filename)); $storage->addFileFromFilesystem($tempStorage->getPath($filename));
my %data; my %data;
my $class = 'WebGUI::Asset::File'; my $class = 'WebGUI::Asset::File';
$class = "WebGUI::Asset::File::Image" if (isIn($storage->getFileExtension($filename),qw(jpg gif png))); $class = "WebGUI::Asset::File::Image" if (isIn($storage->getFileExtension($filename),qw(jpg jpeg gif png)));
my $newAsset = $parent->addChild({className=>$class}); my $newAsset = $parent->addChild({className=>$class});
foreach my $definition (@{$self->definition}) { foreach my $definition (@{$self->definition}) {
foreach my $property (keys %{$definition->{properties}}) { foreach my $property (keys %{$definition->{properties}}) {