Index: openacs-4/packages/acs-tcl/tcl/sql-statement-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/sql-statement-procs.tcl,v diff -u -r1.3 -r1.3.10.1 --- openacs-4/packages/acs-tcl/tcl/sql-statement-procs.tcl 10 Jan 2007 21:22:12 -0000 1.3 +++ openacs-4/packages/acs-tcl/tcl/sql-statement-procs.tcl 5 Dec 2013 11:16:42 -0000 1.3.10.1 @@ -23,8 +23,6 @@ } ad_proc -public ad_sql_get { - { - } sqlarrayname } { @param sqlarrayname array reference @@ -60,13 +58,11 @@ } ad_proc -public ad_sql_append { - { - -select {} - -from {} - -where {} - -groupby {} - -orderby {} - } + {-select {}} + {-from {}} + {-where {}} + {-groupby {}} + {-orderby {}} sqlarrayname } { Adds to the SQL statement.