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.16 -r1.17 --- openacs-4/packages/new-portal/www/place-element.tcl 6 Nov 2001 22:55:40 -0000 1.16 +++ openacs-4/packages/new-portal/www/place-element.tcl 6 Nov 2001 23:36:59 -0000 1.17 @@ -48,11 +48,11 @@ # Set up the form target set target_stub [lindex [ns_conn urlv] [expr [ns_conn urlc] - 1]] -set add_avail_p 0 -set add_html "" +set show_avail_p 0 +set show_html "" set new_package_id [db_nextval acs_object_id_seq] -append add_html "" db_foreach hidden_elements { select element_id, name @@ -62,9 +62,9 @@ and pem.state = 'hidden' order by name } { - set add_avail_p 1 - append add_html "\n" + set show_avail_p 1 + append show_html "\n" } -append add_html "" +append show_html ""