Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v
diff -u -r1.100 -r1.101
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	22 Jan 2002 20:51:49 -0000	1.100
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	22 Jan 2002 23:42:24 -0000	1.101
@@ -361,7 +361,10 @@
         <b>Add a new page:</b> 
         @page_data@
         </form>
-        <P>"
+        <P>
+        <BR>
+        <BR>
+        <b>Configure Page Elements:</b>"
 
         set list_of_page_ids [list $page_id]
 
@@ -392,20 +395,19 @@
             
             if {$element_count == 0} {
                 append template "
-                <b>Page $portal(page_name) has no Elements</b><P>"
+                <P>Page <b>$portal(page_name)</b> has no Elements"
             } else {
                 append template "
-                <b>Configure Page $portal(page_name)'s Elements
-                <P>
-                Debug: element_list $element_list, layout_id $layout_id
-                <P>
-                </b>
+                <P>Page <b>$portal(page_name)</b> Elements</>
                 <include src=\"$portal(template)\" element_list=\"$element_list\" 
                 action_string=@action_string@ portal_id=@portal_id@
                 return_url=\"@return_url@\" element_src=\"@element_src@\"
                 hide_links_p=f page_id=$page_id layout_id=$layout_id>
                 "
             }
+            
+            # clear out the region array
+            array unset fake_element_ids
         }
 
 
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.22 -r1.23
--- openacs-4/packages/new-portal/www/place-element.adp	22 Jan 2002 20:51:49 -0000	1.22
+++ openacs-4/packages/new-portal/www/place-element.adp	22 Jan 2002 23:42:44 -0000	1.23
@@ -32,26 +32,24 @@
 	<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>
 
-        <BR>
+            <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>
 
-        <if @element_multi.hideable_p@ eq "t">
-        <small>[<a href="@target_stub@-2?portal_id=@portal_id@&op=hide&element_id=@element_multi.element_id@">hide</a>]</small>
-        </if>
+    <br>
 
-        <if @other_page_avail_p@ ne 0>
-        <small><multiple name=pages>
-        [<a href="@target_stub@-2?portal_id=@portal_id@&op=move_to_page&element_id=@element_multi.element_id@&page_id=@pages.page_id@">move to @pages.pretty_name@</a>]    
-        </multiple>
-</small>
-        </if>
-    </if>
+    <if @other_page_avail_p@ ne 0>
+      <multiple name=pages>
+        <small>[<a href="@target_stub@-2?portal_id=@portal_id@&op=move_to_page&element_id=@element_multi.element_id@&page_id=@pages.page_id@">move to @pages.pretty_name@</a>]</small>
+      </multiple>
+   </if>
 
 
-    <br>
 </multiple>
 
+</if>
 
-
 <if @show_avail_p@ ne 0>
 <br>
 @show_html@
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.26 -r1.27
--- openacs-4/packages/new-portal/www/place-element.tcl	22 Jan 2002 20:51:49 -0000	1.26
+++ openacs-4/packages/new-portal/www/place-element.tcl	22 Jan 2002 23:42:44 -0000	1.27
@@ -77,6 +77,7 @@
 
 # moving to other pages
 template::multirow create pages page_id pretty_name
+set other_page_avail_p 0
 
 db_foreach other_pages_select {
     select page_id, pretty_name