Index: openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl 11 Sep 2024 06:15:48 -0000 1.3 +++ openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl 20 Oct 2024 10:13:13 -0000 1.4 @@ -1443,8 +1443,8 @@ @return a list of ns_sets with the values of each column of each row returned by the SQL query specified. - @param statement_name The name of the query. - @param sql The SQL to be executed. + @param statement_name name of the query. + @param sql SQL to be executed. @param bind bind variables, passed either as an ns_set id, or via bind value list @return list of ns_sets, one per each row return by the SQL query @@ -2330,8 +2330,7 @@ -column_set } { - -

Performs the SQL query sql. If a row is returned, sets variables + Performs the SQL query sql. If a row is returned, sets variables to column values (or a set or array populated if -column_array or column_set is specified) and returns 1. If no rows are returned, returns 0. @@ -2346,7 +2345,8 @@ @param bind bind variables, passed either as an ns_set id, or via bind value list @param column_array array to be populated with values @param column_set ns_set to be populated with values - + @param statement_name name of the query + @param sql SQL query to be executed } { # Query Dispatcher (OpenACS - ben) set full_statement_name [db_qd_get_fullname $statement_name] 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.193 -r1.194 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 18 Oct 2024 12:02:53 -0000 1.193 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 20 Oct 2024 10:13:13 -0000 1.194 @@ -400,8 +400,10 @@ prohibit this.

- Example usage: set html [export_vars -form { foo bar baz }]
- set url [export_vars { foo bar baz }] + Example usages: +

+    set html [export_vars -form { foo bar baz }]
+    set url [export_vars { foo bar baz }]

This will export the three variables foo, @@ -410,7 +412,8 @@ bar baz}].

- Example usage: [export_vars -sign -override {{foo "new value"}} -exclude { bar } { foo bar baz }] + Example usage:

+    export_vars -sign -override {{foo "new value"}} -exclude { bar } { foo bar baz }

@@ -544,6 +547,8 @@ "form\:id". Sorry. @param sign Sign all variables. + @param anchor fragment component that will be preceded by a hash (#) in the result URL + @param exclude list of variables that will not be exported @param url Export in URL format. This is the default. @@ -557,18 +562,18 @@ @param entire_form Export the entire form from the GET query string or the POST. - @option no_empty If specified, variables with an empty string + @param no_empty If specified, variables with an empty string value will be suppressed from being exported. This avoids cluttering up the URLs with lots of unnecessary variables. - @option base The base URL to make a link to. The provided value + @param base The base URL to make a link to. The provided value should be a plain value (i.e. urldecoded). In case the provided value is urlencoded, use the flag "-no_base_encode". The value of this parameter will be prepended to the query string along with a question mark (?), if the query is nonempty. The returned string can be used directly in a link (when output is in URL format). - @option no_base_encode Decides whether argument passed as + @param no_base_encode Decides whether argument passed as base option will be encoded by ad_urlencode_url proc @@ -584,6 +589,9 @@ request form data was a subset of the whole form containing only the selected variables. + @param override variable specs, overriding the specs in 'vars' + @param vars variable specs for export + @author Lars Pind (lars@pinds.com) @creation-date December 7, 2000 } { @@ -942,7 +950,8 @@ Block a request for certain kind of requests. This proc can be used to disallow, e.g., requests from bots in login pages or similar. - Example:

::util::block_request -condition {[ns_conn pool] eq "bots"} -target bots
+ Example:
+    ::util::block_request -condition {[ns_conn pool] eq "bots"} -target bots
The proc either terminates the requests by responding a blocking message to the client, or it continues and returns nothing. @@ -2225,7 +2234,7 @@ at the expense of truncating args. @param level The level to start from, relative to this - proc. Defaults to -2, meaning the proc that called this proc's + proc. The value -2 refers to the proc that called this proc's caller. Per default, don't show "ad_log", when this calls ad_get_tcl_call_stack. @@ -2289,8 +2298,8 @@ @see for @see ns_set - @param duplicates This optional switch argument defines what happens if the - Tcl var already exists, or if there are duplicate entries for the same key. + @param duplicates This argument defines what happens when the + Tcl variable already exists, or if there are duplicate entries for the same key. overwrites just overwrites the var, which amounts to letting the ns_set win over pre-defined vars, and later entries in the ns_set win over earlier ones. ignore means the variable isn't overwritten. @@ -3763,7 +3772,7 @@ } { Convenience wrapper for simple usages of ns_job provided by - AOLServer and NaviServer. The provided command (args) is executed + NaviServer. The provided command (args) is executed in a separate thread of the specified job queue. On success the function returns the result of the provided command. @@ -3775,7 +3784,7 @@ @author Gustaf Neumann @param queue Name of job queue - @param timeout timeout for job, might be 1:0 for 1 sec + @param timeout timeout for job, specified in seconds or as a number with a time unit (e.g., 10ms) @param args the command to be executed @return result of the specified command } {