Index: openacs-4/packages/new-portal/www/admin/portal-config-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/admin/portal-config-2.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/new-portal/www/admin/portal-config-2.tcl	29 Mar 2002 18:48:29 -0000	1.2
+++ openacs-4/packages/new-portal/www/admin/portal-config-2.tcl	16 Apr 2002 13:55:46 -0000	1.3
@@ -25,10 +25,11 @@
 
 set form [ns_getform]
 set portal_id [ns_set get $form portal_id]
+set return_url [ns_set get $form return_url]
 
 set user_id [ad_conn user_id]
 
 portal::configure_dispatch $portal_id $form
 
-ns_returnredirect "portal-config?portal_id=$portal_id"
+ns_returnredirect "portal-config?portal_id=$portal_id&referer=$return_url"