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

added media folder for rich edit upload

Browse source
This commit is contained in:
JT Smith 2006-04-14 13:57:05 +00:00
parent 8129361a24
commit 69eb231524
3 changed files with 46 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/AdminConsole.pm
View file

@ -442,8 +442,10 @@ sub render {
if (defined $self->session->asset) {
my $importNode = WebGUI::Asset->getImportNode($self->session);
my $importNodeLineage = $importNode->get("lineage");
my $media = WebGUI::Asset->getMedia($self->session);
my $mediaLineage = $media->get("lineage");
my $assetLineage = $self->session->asset->get("lineage");
if ($assetLineage =~ /^$importNodeLineage/ || $assetLineage eq "000001" || ($self->session->asset->get("state") ne "published" && $self->session->asset->get("state") ne "archived")) {
if ($assetLineage =~ /^$importNodeLineage/ || $assetLineage eq "000001" || $assetLineage =~ /^$mediaLineage/ || ($self->session->asset->get("state") ne "published" && $self->session->asset->get("state") ne "archived")) {
$var{"backtosite.url"} = WebGUI::Asset->getDefault($self->session)->getUrl;
} else {
$var{"backtosite.url"} = $self->session->asset->getContainer->getUrl;

19
lib/WebGUI/Asset.pm
View file

@ -763,6 +763,25 @@ sub getImportNode {
#-------------------------------------------------------------------
=head2 getMedia ( session )
Constructor. Returns the media folder.
=head3 session
A reference to the current session.
=cut
sub getMedia {
my $class = shift;
my $session = shift;
return WebGUI::Asset->new($session, "PBasset000000000000003");
}
#-------------------------------------------------------------------
=head2 getMenuTitle ( )