From 612f08b37ca87d5a38f32bd60d5b81de6ef92062 Mon Sep 17 00:00:00 2001
From: Lucas Bartholemy <lbartholemy@webgui-svn>
Date: Wed, 17 May 2006 19:38:55 +0000
Subject: [PATCH] added privilege check - only content managers can create
 shortcuts

---
 lib/WebGUI/AssetClipboard.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/AssetClipboard.pm b/lib/WebGUI/AssetClipboard.pm
index 8c387f63b..2be9078ff 100644
--- a/lib/WebGUI/AssetClipboard.pm
+++ b/lib/WebGUI/AssetClipboard.pm
@@ -211,6 +211,7 @@ sub www_copyList {
 
 sub www_createShortcut () {
 	my $self = shift;
+	return $self->session->privilege->insufficient() unless ($self->session->user->isInGroup(4));	
 	my $isOnDashboard = ref $self->getParent eq 'WebGUI::Asset::Wobject::Dashboard';
 	my $target = $isOnDashboard ? $self->getParent : $self;
 	my $child = $target->addChild({