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.4 -r1.5
--- openacs-4/packages/new-portal/www/place-element.tcl	30 Sep 2001 18:58:41 -0000	1.4
+++ openacs-4/packages/new-portal/www/place-element.tcl	5 Oct 2001 02:23:46 -0000	1.5
@@ -21,7 +21,7 @@
 set portal_id $element_id
 
 # can this region be edited?
-if { [portal_region_immutable_p $region] } {
+if { [portal::region_immutable_p $region] } {
     set immutable_p 1
     set would_be_immutable_p 0
 } else {
@@ -41,7 +41,7 @@
      order by pe.sort_key" \
 {
     template::multirow append element_multi $element_id $name $sort_key
-    if {![portal_region_immutable_p $region]} {
+    if {![portal::region_immutable_p $region]} {
 	incr region_count
     }
 }