Index: openacs-4/packages/new-portal/www/render-element.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/render-element.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/new-portal/www/render-element.tcl	9 Nov 2001 17:37:07 -0000	1.7
+++ openacs-4/packages/new-portal/www/render-element.tcl	13 Nov 2001 17:35:48 -0000	1.8
@@ -12,7 +12,7 @@
 
 # get the complete, evaluated element.
 # if there's an error, report it.
-if { [catch {set element_data [portal::evaluate_element $element_id] } errmsg ] } {
+if { [catch {set element_data [portal::evaluate_element $element_id $theme_id] } errmsg ] } {
     if { [ad_parameter log_datasource_errors_p] == 1} {
 	ns_log Error "portal: $errmsg"
     }
Index: openacs-4/packages/new-portal/www/layouts/simple2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/layouts/simple2.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/new-portal/www/layouts/simple2.adp	6 Nov 2001 22:26:24 -0000	1.2
+++ openacs-4/packages/new-portal/www/layouts/simple2.adp	13 Nov 2001 17:34:58 -0000	1.3
@@ -4,12 +4,12 @@
     <tr>
       <td valign=top width="50%">
         <list name="element_ids_1">
-          <include src="@element_src@" element_id="@element_ids_1:item@" action_string=@action_string@ region="1"><br>
+          <include src="@element_src@" element_id="@element_ids_1:item@" action_string=@action_string@ theme_id=@theme_id@ region="1"><br>
         </list>
       </td>
       <td valign=top width="50%">
         <list name="element_ids_2">
-          <include src="@element_src@" element_id="@element_ids_2:item@" action_string=@action_string@  region="2"><br>
+          <include src="@element_src@" element_id="@element_ids_2:item@" action_string=@action_string@ theme_id=@theme_id@ region="2"><br>
         </list>
       </td>
     </tr>
Index: openacs-4/packages/new-portal/www/layouts/simple2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/layouts/simple2.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/new-portal/www/layouts/simple2.tcl	6 Nov 2001 23:36:48 -0000	1.4
+++ openacs-4/packages/new-portal/www/layouts/simple2.tcl	13 Nov 2001 17:35:10 -0000	1.5
@@ -5,10 +5,16 @@
     element_list:onevalue
     element_src:onevalue
     action_string:onevalue
+    theme_id:onevalue
 }
 
 if { ![info exists action_string]} {
     set action_string ""
 }
 
+if { ![info exists theme_id]} {
+    set theme_id ""
+}
+
+
 portal::layout_elements $element_list