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.9 -r1.10
--- openacs-4/packages/static-portlet/www/element-new.tcl	9 Aug 2002 18:39:33 -0000	1.9
+++ openacs-4/packages/static-portlet/www/element-new.tcl	16 Oct 2002 15:41:55 -0000	1.10
@@ -32,6 +32,15 @@
 
 set title "New $element_pretty_name"
 
+#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 "Control Panel"
+}
+
 form create new_static_element
 
 element create new_static_element pretty_name \
@@ -85,3 +94,14 @@
     ad_returnredirect $referer
     ad_script_abort
 }
+
+
+
+
+
+
+
+
+
+
+