From: Stephen Soltesz <soltesz@cs.princeton.edu>
Date: Mon, 15 Jun 2009 18:33:03 +0000 (+0000)
Subject: only display 'Add Node' to admins
X-Git-Tag: PLEWWW-4.3-19~2
X-Git-Url: http://git.onelab.eu/?a=commitdiff_plain;h=47d4e4f9588d4e874d6a32f55ebc3f7e975a03b8;hp=5b3e62ff0553b15dc87417bc070576f249f4c827;p=plewww.git

only display 'Add Node' to admins
---

diff --git a/modules/planetlab.module b/modules/planetlab.module
index 69e6852..ec784be 100644
--- a/modules/planetlab.module
+++ b/modules/planetlab.module
@@ -210,7 +210,8 @@ function planetlab_block($op = 'list', $delta = 0, $edit = array()) {
 	$bullet_item = '';
 	$bullet_item .= href(l_admin(),"Admin search");
 	$bullet_item .= ul_start();
-	$bullet_item .= leaf( href (l_node_add(),"Add Node"));
+	if ( plc_is_admin() )
+	  $bullet_item .= leaf( href (l_node_add(),"Add Node"));
 	$bullet_item .= leaf( href( l_tags(),"Tags"));
 	$bullet_item .= leaf( href( l_nodegroups(),"Node groups"));
 	$bullet_item .= leaf (href(l_peers(),'Peers'));