Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v diff -u -r1.148.2.15 -r1.148.2.16 --- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 9 Aug 2019 19:45:14 -0000 1.148.2.15 +++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 22 Nov 2019 16:11:32 -0000 1.148.2.16 @@ -510,7 +510,7 @@ set qn [uplevel [list [self] qn $qn]] # # The prepare statement in the next line works probably only with - # inline sql statements. + # inline SQL statements. # #if {[info exists prepare]} {set sql [:prepare -dbn $dbn -argtypes $prepare $sql]} #ns_log notice "### [list ::db_foreach -dbn $dbn $qn $sql $body {*}$bindOpt]" @@ -646,7 +646,7 @@ ::xo::db::DB-postgresql instproc prepare {-handle:required {-argtypes ""} sql} { # # Define a md5 key for the prepared statement in nsv based on the - # sql statement. + # SQL statement. # set key [ns_md5 $sql] @@ -978,7 +978,7 @@ -check_function sql_file } { - Load the sql file, if the kernel is older than the specified + Load the SQL file, if the kernel is older than the specified version, and the version of the specified package is older, and the check_function does not exist in function_args.

Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v diff -u -r1.76.2.26 -r1.76.2.27 --- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl 29 Sep 2019 16:09:03 -0000 1.76.2.26 +++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl 22 Nov 2019 16:11:32 -0000 1.76.2.27 @@ -609,7 +609,7 @@ {-base_table "cr_revisions"} } { returns the SQL-query to select the CrItems of the specified object_type - @param select_attributes attributes for the sql query to be retrieved, in addition + @param select_attributes attributes for the SQL query to be retrieved, in addition to item_id, name, publish_status, object_type, and package_id which are always returned @param orderby for ordering the solution set @@ -620,7 +620,7 @@ @param folder_id parent_id @param publish_status one of 'live', 'ready', or 'production' @param base_table typically automatic view, must contain title and revision_id - @return sql query + @return SQL query } { if {![info exists folder_id]} {set folder_id ${:folder_id}} if {![info exists parent_id]} {set parent_id $folder_id} @@ -1430,7 +1430,7 @@ {-base_table "cr_folders"} } { returns the SQL-query to select the CrItems of the specified object_type - @param select_attributes attributes for the sql query to be retrieved, in addition + @param select_attributes attributes for the SQL query to be retrieved, in addition to item_id, name, publish_status, object_type which are always returned @param orderby for ordering the solution set @param where_clause clause for restricting the answer set @@ -1440,7 +1440,7 @@ @param folder_id parent_id @param publish_status one of 'live', 'ready', or 'production' @param base_table typically automatic view, must contain title and revision_id - @return sql query + @return SQL query } { if {![info exists folder_id]} {set folder_id ${:folder_id}} if {![info exists parent_id]} {set parent_id $folder_id} Index: openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl,v diff -u -r1.57.2.9 -r1.57.2.10 --- openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl 5 Nov 2019 17:27:02 -0000 1.57.2.9 +++ openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl 22 Nov 2019 16:15:25 -0000 1.57.2.10 @@ -317,7 +317,7 @@ ad_proc add_ltree_order_column {} { Add page_order of type ltree, when ltree is configured (otherwise string) } { - # catch sql statement to allow multiple runs + # catch SQL statement to allow multiple runs catch {::xo::db::sql::content_type create_attribute \ -content_type ::xowiki::Page \ -attribute_name page_order \