Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v diff -u -r1.19 -r1.20 --- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl 11 Mar 2005 20:12:55 -0000 1.19 +++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl 11 Mar 2005 22:37:44 -0000 1.20 @@ -729,7 +729,7 @@ switch -exact $c { 0 { # code ok if {[llength $ret] > 0} { - lappend returns [list $ret] + lappend returns $ret } } 1 { # code error - either rethrow the current error or log @@ -744,7 +744,7 @@ } 3 { # code break -- terminate return current list of results. if {[llength $ret] > 0} { - lappend returns [list $ret] + lappend returns $ret } return $returns }