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

remove createShortcut from Asset

Browse source
This commit is contained in:
Doug Bell 2011-02-23 16:41:26 -06:00
parent 8650e714b5
commit 9b330fc217
1 changed files with 0 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

47
lib/WebGUI/AssetClipboard.pm
View file

@ -356,53 +356,6 @@ sub pasteInFork {
} ## end sub pasteInFork
#-------------------------------------------------------------------
=head2 www_createShortcut ( )
=cut
sub www_createShortcut {
my $self = shift;
my $session = $self->session;
return $session->privilege->insufficient()
if !$session->user->isInGroup(12) || !$self->canView;
my $isOnDashboard = $self->getParent->isa('WebGUI::Asset::Wobject::Dashboard');
my $shortcutParent = $isOnDashboard? $self->getParent : WebGUI::Asset->getImportNode($session);
my $child = $shortcutParent->addChild({
className=>'WebGUI::Asset::Shortcut',
shortcutToAssetId=>$self->getId,
title=>$self->getTitle,
menuTitle=>$self->getMenuTitle,
isHidden=>$self->get("isHidden"),
newWindow=>$self->get("newWindow"),
ownerUserId=>$self->get("ownerUserId"),
groupIdEdit=>$self->get("groupIdEdit"),
groupIdView=>$self->get("groupIdView"),
url=>$self->get("title"),
templateId=>'PBtmpl0000000000000140'
});
if (! $isOnDashboard) {
$child->cut;
}
if (WebGUI::VersionTag->autoCommitWorkingIfEnabled($session, {
allowComments => 1,
returnUrl => $self->getUrl,
}) eq 'redirect') {
return 'redirect';
};
if ($isOnDashboard) {
return $self->getParent->www_view;
} else {
$self->session->asset($self->getContainer);
return $self->session->asset->www_manageAssets if ($self->session->form->process("proceed") eq "manageAssets");
return $self->session->asset->www_view;
}
}
#-------------------------------------------------------------------
=head2 www_cut ( )