Index: openacs-4/packages/static-portlet/www/element-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/Attic/element-new.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/static-portlet/www/element-new.tcl	10 Nov 2002 17:44:39 -0000	1.11
+++ openacs-4/packages/static-portlet/www/element-new.tcl	4 Dec 2002 09:56:14 -0000	1.12
@@ -41,6 +41,15 @@
     set control_panel_text "[_ static-portlet.Control_Panel]"
 }
 
+#these are set for display and instructions.
+set community_id $package_id
+
+set portal_name [portal::get_name $portal_id]
+
+if {![info exists control_panel_text]} {
+    set control_panel_text "[_ static-portlet.Control_Panel]"
+}
+
 form create new_static_element
 
 element create new_static_element pretty_name \