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.5 -r1.6
--- openacs-4/packages/new-portal/www/place-element.tcl	5 Oct 2001 02:23:46 -0000	1.5
+++ openacs-4/packages/new-portal/www/place-element.tcl	25 Oct 2001 02:30:57 -0000	1.6
@@ -53,3 +53,6 @@
 where
 portal_id = :portal_id
 and region not like 'i%'"
+
+# Set up the form target
+set target_stub [lindex [ns_conn urlv] [expr [ns_conn urlc] - 1]]