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

Added some web services to the Gallery asset to support the use of remote

Browse source 
apps to post photos and create albums.
This commit is contained in:
JT Smith 2008-10-14 01:09:43 +00:00
parent 810c8247cc
commit e89d1527fa
4 changed files with 334 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

27
lib/WebGUI/Asset/File.pm
View file

@ -378,24 +378,31 @@ sub purgeRevision {
#----------------------------------------------------------------------------
=head2 setFile ( filename )
=head2 setFile ( [pathtofile] )
Tells the asset to do all the postprocessing on the file (setting privs, thubnails, or whatever).
=head3 pathtofile
If specified will copy a new file into the storage location from this path and delete any existing file.
Set the file being handled by this storage location with a file from the
system.
=cut
sub setFile {
my $self = shift;
my $filename = shift;
my $storage = $self->getStorageLocation;
# Clear the old file if any
$storage->clear;
$storage->addFileFromFilesystem($filename)
|| croak "Couldn't setFile: " . join(", ",@{ $storage->getErrors });
# NOTE: We should not croak here, the WebGUI::Storage should croak for us.
if ($filename) {
my $storage = $self->getStorageLocation;
# Clear the old file if any
$storage->clear;
$storage->addFileFromFilesystem($filename)
|| croak "Couldn't setFile: " . join(", ",@{ $storage->getErrors });
# NOTE: We should not croak here, the WebGUI::Storage should croak for us.
}
$self->updatePropertiesFromStorage;
$self->applyConstraints;