Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v diff -u -r1.189.2.64 -r1.189.2.65 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 8 Aug 2020 11:19:23 -0000 1.189.2.64 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 24 Aug 2020 23:50:18 -0000 1.189.2.65 @@ -980,7 +980,7 @@ } -# some procs to make it easier to deal with CSV files (reading and writing) +# Some procs to make it easier to deal with CSV files (reading and writing) # added by philg@mit.edu on October 30, 1999 ad_proc util_escape_quotes_for_csv {string} { @@ -998,8 +998,9 @@ {-override_headers {}} {-constants ""} } { - This processes a CSV of objects, taking the csv and calling package_instantiate_object - for each one. + + This processes a comma separated set of objects, taking the CSV + and calling package_instantiate_object for each one. @return a list of the created object_ids } { @@ -1075,12 +1076,12 @@ {-array_name:required} code_block } { - reads a csv and executes code block for each row in the csv. + Reads a CSV string and executes code block for each row in the CSV. - @param file the csv file to read. + @param file the CSV file to read. @param header_line the line with the list of var names - @param override_headers the list of variables in the csv - @param array_name the name of the array to set with the values from the csv as each line is read. + @param override_headers the list of variables in the CSV + @param array_name the name of the array to set with the values from the CSV as each line is read. } { # FIXME: We should catch the error here set csv_stream [open $file r]