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.7 -r1.8
--- openacs-4/packages/new-portal/www/place-element.tcl 25 Oct 2001 18:52:48 -0000 1.7
+++ openacs-4/packages/new-portal/www/place-element.tcl 1 Nov 2001 23:16:18 -0000 1.8
@@ -55,3 +55,25 @@
# Set up the form target
set target_stub [lindex [ns_conn urlv] [expr [ns_conn urlc] - 1]]
+
+
+# create the fancy drop down for add
+
+set add_html ""
+set new_package_id [db_nextval acs_object_id_seq]
+
+append add_html ""
+