Added Real Objects Edit-On Pro integration.

This commit is contained in:
JT Smith 2002-05-07 01:51:07 +00:00
parent 0d32a1b901
commit 03599c4e83
16 changed files with 259 additions and 15 deletions

View file

@ -49,6 +49,7 @@ use WebGUI::Utility;
$attachment->getThumbnail;
$attachment->getType;
$attachment->getURL;
$attachment->rename("thisfile.txt");
$attachment->save("formImage");
=head1 DESCRIPTION
@ -305,6 +306,24 @@ sub new {
}
#-------------------------------------------------------------------
=head2 rename ( newFilename )
Renames an attachment's filename.
=item newFilename
Define the new filename for this attachment.
=cut
sub rename {
rename $_[0]->getPath, $_[0]->{_node}->getPath.'/'.$_[1];
$_[0]->{_filename} = $_[1];
}
#-------------------------------------------------------------------
=head2 save ( formVariableName [, thumbnailSize ] )