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.93 -r1.94
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	21 Jan 2002 09:37:41 -0000	1.93
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	21 Jan 2002 15:42:32 -0000	1.94
@@ -96,7 +96,7 @@
 	{-name "Untitled"} 
 	{-template_id ""} 
 	{-portal_template_p "f"} 
-	{-layout_name "'Simple 2-Column'"}
+	{-layout_name "Simple 2-Column"}
 	{-context_id ""} 
 	user_id 
     } {
@@ -106,7 +106,7 @@
 	@param user_id
 	@param layout_name optional
     } {
-	db_1row min_layout_id_select {}
+	db_1row layout_id_select {}
 	return [ db_exec_plsql create_new_portal_and_perms {}]
     }
     
Index: openacs-4/packages/new-portal/tcl/portal-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/new-portal/tcl/portal-procs.xql	21 Jan 2002 07:16:14 -0000	1.6
+++ openacs-4/packages/new-portal/tcl/portal-procs.xql	21 Jan 2002 15:42:32 -0000	1.7
@@ -19,10 +19,11 @@
   </querytext>
 </fullquery> 
 
-<fullquery name="portal::create.min_layout_id_select">      
+<fullquery name="portal::create.layout_id_select">      
   <querytext>
-    select min(layout_id) as layout_id from
-    portal_layouts 
+    select layout_id from
+    portal_layouts where
+    name = :layout_name 
   </querytext>
 </fullquery>