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.172.2.2.4.5 -r1.172.2.2.4.6 --- openacs-4/packages/new-portal/tcl/portal-procs.tcl 22 Jul 2004 05:47:00 -0000 1.172.2.2.4.5 +++ openacs-4/packages/new-portal/tcl/portal-procs.tcl 28 Jul 2004 00:06:26 -0000 1.172.2.2.4.6 @@ -146,7 +146,7 @@ set page_name_list [list "Page 1"] set layout_name_list [list "#new-portal.simple_2column_layout_name#"] - ns_log Warning "CREATING A NEW PORTAL" + if {![empty_string_p $csv_list]} { set page_name_and_layout_list [split [string trimright $csv_list ";"] ";"] set page_name_list [list]