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

deleting a file from an Image Storage location did not delete the thumbnail

Browse source
This commit is contained in:
Colin Kuskie 2007-04-23 05:13:59 +00:00
parent 531a53f4dc
commit 8faf7951d0
2 changed files with 23 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

21
lib/WebGUI/Storage/Image.pm
View file

@ -95,6 +95,27 @@ sub copy {
return $self->SUPER::copy($newStorage, $filelist);
}
#-------------------------------------------------------------------
=head2 deleteFile ( filename )
Deletes the thumbnail for a file and the file from its storage location
=head3 filename
The name of the file to delete.
=cut
sub deleteFile {
my $self = shift;
my $filename = shift;
$self->SUPER::deleteFile('thumb-'.$filename);
$self->SUPER::deleteFile($filename);
}
#-------------------------------------------------------------------
=head2 generateThumbnail ( filename, [ thumbnailSize ] )