Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v
diff -u -r1.70 -r1.71
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	21 Nov 2001 18:33:17 -0000	1.70
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	21 Nov 2001 18:47:02 -0000	1.71
@@ -569,7 +569,7 @@
 	}
     }
 
-    ad_proc -public template_configure { portal_id } {
+    ad_proc -public template_configure { portal_id return_url } {
 	Return a portal configuration page. 
 	All form targets point to file_stub-2.
     
@@ -672,9 +672,9 @@
 	    set template "	
 	    <master src=\"@master_template@\">
 	    <p>
+	    <a href=$return_url>Go back</a>
 	    <form action=@action_string@>
-	    <P>
-	    
+	    <P>	    
 	    <form method=post action=@action_string@>
 	    <input type=hidden name=portal_id value=@portal_id@>
 	    <b>Change Theme:</b>