Index: openacs-4/packages/new-portal/www/place-element.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/place-element.adp,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/new-portal/www/place-element.adp	13 Dec 2001 21:10:02 -0000	1.19
+++ openacs-4/packages/new-portal/www/place-element.adp	18 Dec 2001 21:28:09 -0000	1.20
@@ -32,7 +32,9 @@
 	<if @region@ eq @num_regions@><a href="@target_stub@-2?portal_id=@portal_id@&op=move&element_id=@element_multi.element_id@&direction=left&region=@region@"><img border=0 src="@dir@/arrow-left.gif" alt="move left"></a>
 	</if>
 
-[<a href="@target_stub@-2?portal_id=@portal_id@&op=hide&element_id=@element_multi.element_id@">hide</a>]    
+            <if @element_multi.hideable_p@ eq "t">
+            [<a href="@target_stub@-2?portal_id=@portal_id@&op=hide&element_id=@element_multi.element_id@">hide</a>]    
+            </if>
     </if>
 
 
Index: openacs-4/packages/new-portal/www/place-element.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/place-element.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/new-portal/www/place-element.tcl	7 Dec 2001 23:45:56 -0000	1.21
+++ openacs-4/packages/new-portal/www/place-element.tcl	18 Dec 2001 21:28:25 -0000	1.22
@@ -21,7 +21,8 @@
 
 # get the elements for this region.
 set region_count 0
-template::multirow create element_multi element_id name sort_key state
+template::multirow create element_multi element_id name sort_key state hideable_p
+
 db_foreach select_elements_by_region {
     select element_id, pretty_name as name,  sort_key, state
      from portal_element_map pem
@@ -30,8 +31,11 @@
        and region = :region 
        and state != 'hidden'
     order by sort_key } {
+
+        set hideable_p [portal::get_element_param $element_id "hideable_p"]
+        
 	template::multirow append element_multi \
-		$element_id $name $sort_key $state
+		$element_id $name $sort_key $state $hideable_p
 	incr region_count
     }