Index: openacs-4/contrib/packages/portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/portal/tcl/portal-procs.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/contrib/packages/portal/tcl/portal-procs.tcl 12 Feb 2004 21:31:20 -0000 1.13
+++ openacs-4/contrib/packages/portal/tcl/portal-procs.tcl 13 Feb 2004 20:00:46 -0000 1.14
@@ -111,11 +111,11 @@
}
if { $configure_params_p && ![string equal $template_id ""] } {
- foreach {datasource element_id} [db_list_of_lists get_elements {}] {
+ foreach row [db_list_of_lists get_elements {}] {
portal::datasource::call \
- -name $name \
+ -name [lindex $row 0] \
-op ConfigureParams \
- -list_args [list $element_id]
+ -list_args [list [lindex $row 1]]
}
}
Index: openacs-4/contrib/packages/portal/www/admin/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/portal/www/admin/index.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/portal/www/admin/index.adp 12 Feb 2004 21:31:21 -0000 1.2
+++ openacs-4/contrib/packages/portal/www/admin/index.adp 13 Feb 2004 20:00:46 -0000 1.3
@@ -3,7 +3,8 @@