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.68 -r1.69
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	19 Nov 2001 16:33:00 -0000	1.68
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	19 Nov 2001 16:46:31 -0000	1.69
@@ -206,7 +206,8 @@
 	    <include src=\"@portal.layout_template@\" 
 	    element_list=\"@element_list@\"
 	    element_src=\"@element_src@\"
-	    theme_id=@portal.theme_id@>"
+	    theme_id=@portal.theme_id@
+	    portal_id=@portal.portal_id@>"
 	}
 	
 	# Necessary hack to work around the acs-templating system
@@ -384,7 +385,8 @@
 	    
 	    <b>Configure The Portal's Elements:</b>
 	    <include src=\"@portal.template@\" element_list=\"@element_list@\" 
-	    element_src=\"@element_src@\" action_string=@action_string@>
+	    element_src=\"@element_src@\" action_string=@action_string@
+	    portal_id=@portal_id@>
 	    
 	    
 	    <form method=post action=@action_string@>