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

- fix [ 1206045 ] Max Image Size don't work

Browse source
This commit is contained in:
Matthew Wilson 2005-06-13 17:44:52 +00:00
parent 53349c9e1e
commit 7e9cd9b089
1 changed files with 14 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/WebGUI/Asset/File/Image.pm
View file

@ -204,7 +204,20 @@ sub processPropertiesFromFormPost {
unless ($parameters =~ /alt\=/) { unless ($parameters =~ /alt\=/) {
$self->update({parameters=>$parameters.' alt="'.$self->get("title").'"'}); $self->update({parameters=>$parameters.' alt="'.$self->get("title").'"'});
} }
$self->generateThumbnail; my $storage = $self->getStorageLocation;
$self->generateThumbnail($session{setting}{maxImageSize});
$storage->deleteFile($self->get("filename"));
$storage->renameFile('thumb-'.$self->get("filename"),$self->get("filename"));
$self->generateThumbnail($session{form}{thumbnailSize});
}
#-------------------------------------------------------------------
sub setSize {
my $self = shift;
my $input = shift;
my $storage = $self->getStorageLocation;
my $size = ($input > $storage->getFileSize($self->get("filename"))) ? $input : $storage->getFileSize($self->get("filename"));
return $self->SUPER::setSize($size);
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
@ -218,8 +231,6 @@ sub view {
return $self->processTemplate(\%var,$self->get("templateId")); return $self->processTemplate(\%var,$self->get("templateId"));
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub www_edit { sub www_edit {
my $self = shift; my $self = shift;