Index: openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl,v diff -u -N -r1.72.2.30 -r1.72.2.31 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 16 Mar 2021 11:56:29 -0000 1.72.2.30 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 2 Sep 2021 16:40:48 -0000 1.72.2.31 @@ -1440,7 +1440,7 @@ } ad_proc -private is_object {scope proc_name} { - Checks, whether the specified argument is an xotcl object. + Checks, whether the specified argument is an XOTcl object. Does not cause problems when xotcl is not loaded. @return boolean value } { @@ -1813,7 +1813,7 @@ } # # The last four words in the following clause - # are deprecated procs which are unfortunatley + # are deprecated procs which are unfortunately # picked up as commands by # apidoc::tclcode_to_html. Therefore, we # ignore these explicitly. Index: openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl,v diff -u -N -r1.4.2.30 -r1.4.2.31 --- openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl 23 Mar 2021 12:59:06 -0000 1.4.2.30 +++ openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl 2 Sep 2021 16:40:49 -0000 1.4.2.31 @@ -588,7 +588,7 @@ /api-doc/ /api-doc/proc-search } acs_api_browser_search { - Simple test to search for a proc in the api-browser + Simple test to search for a proc in the API-browser @author Héctor Romojaro @creation-date 03 March 2021 @@ -601,7 +601,7 @@ set user_info [acs::test::user::create -user_id $user_id -admin] acs::test::confirm_email -user_id $user_id # - # Go to the api-doc and check status code + # Go to the API-doc and check status code # set d [acs::test::http -depth 3 -user_info $user_info /api-doc] acs::test::reply_has_status_code $d 200 Index: openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl,v diff -u -N -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl 14 Feb 2021 21:21:52 -0000 1.5.2.1 +++ openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl 2 Sep 2021 16:40:49 -0000 1.5.2.2 @@ -83,7 +83,7 @@ } # - # In general we face here a race condition. The entry for the + # In general, we face here a race condition. The entry for the # keys might have timed out. So, the cache lookup might # fail. So, we provide a "value" with an empty string as # default. Index: openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl,v diff -u -N -r1.15.2.1 -r1.15.2.2 --- openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl 22 Oct 2019 07:59:19 -0000 1.15.2.1 +++ openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl 2 Sep 2021 16:40:49 -0000 1.15.2.2 @@ -91,7 +91,7 @@ ######################### # -# twt::user namespace +# twt::usernamespace # ######################### Index: openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl,v diff -u -N -r1.36.2.7 -r1.36.2.8 --- openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl 20 Apr 2021 11:42:57 -0000 1.36.2.7 +++ openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl 2 Sep 2021 16:40:49 -0000 1.36.2.8 @@ -814,7 +814,7 @@ -filename:required } { Export the content of the provided revision to the named file in - the file system. + the filesystem. } { ::content::revision::export_to_filesystem-$storage_type \ -revision_id $revision_id \ @@ -826,7 +826,7 @@ -filename:required } { Export the content of the provided revision to the named file in - the file system. + the filesystem. } { set content [db_string select_object_content { select content from cr_revisions where revision_id = :revision_id @@ -841,7 +841,7 @@ -filename:required } { Export the content of the provided revision to the named file in - the file system. + the filesystem. } { set cr_file_name [content::revision::get_cr_file_path -revision_id $revision_id] @@ -874,7 +874,7 @@ -filename:required } { Export the content of the provided revision to the named file in - the file system. + the filesystem. } { db_blob_get_file select_object_content {} -file $filename } Index: openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl,v diff -u -N -r1.11.2.5 -r1.11.2.6 --- openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl 18 Feb 2021 14:48:10 -0000 1.11.2.5 +++ openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl 2 Sep 2021 16:40:50 -0000 1.11.2.6 @@ -69,7 +69,7 @@ # # There is no [ad_conn file] processed yet. Therefore, we have to # compute the path (consider just the path after the package_url - # for file name construction). + # for filename construction). # set url [ad_conn url] # Index: openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl,v diff -u -N -r1.9 -r1.9.2.1 --- openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl 7 Aug 2017 23:47:54 -0000 1.9 +++ openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl 2 Sep 2021 16:40:50 -0000 1.9.2.1 @@ -49,7 +49,7 @@ }] } if {$files eq ""} { - append text "
  • No sql file found." + append text "
  • No SQL file found." } append text {} set context [list [list ../$package_key $package_key] "SQL Display"] Index: openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl,v diff -u -N -r1.15.2.11 -r1.15.2.12 --- openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl 24 Jun 2021 11:48:52 -0000 1.15.2.11 +++ openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl 2 Sep 2021 16:40:50 -0000 1.15.2.12 @@ -2135,7 +2135,7 @@ # https://tools.ietf.org/html/rfc5598#section-3.4.1 # # originator A special case alternate to 'From' header. - # Usually defined by first SMTP MTA. + # Usually, defined by first SMTP MTA. # Notices may be sent to this address when # a bounce notice to the original email's 'From' # address bounces. Index: openacs-4/packages/acs-outdated/tcl/acs-tcl-admin-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-outdated/tcl/acs-tcl-admin-procs.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/acs-outdated/tcl/acs-tcl-admin-procs.tcl 1 May 2018 09:06:57 -0000 1.4 +++ openacs-4/packages/acs-outdated/tcl/acs-tcl-admin-procs.tcl 2 Sep 2021 16:40:50 -0000 1.4.2.1 @@ -2,7 +2,7 @@ ad_proc -private ad_user_class_query { set_id } { Takes an ns_set of key/value pairs and produces a query for the class of users specified (one user per row returned). - @param set_id The id of a ns_set containing all the parameters of the user class. + @param set_id The id of an ns_set containing all the parameters of the user class. } { Index: openacs-4/packages/acs-templating/tcl/head-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/head-procs.tcl,v diff -u -N -r1.45.2.26 -r1.45.2.27 --- openacs-4/packages/acs-templating/tcl/head-procs.tcl 2 Sep 2021 14:40:04 -0000 1.45.2.26 +++ openacs-4/packages/acs-templating/tcl/head-procs.tcl 2 Sep 2021 16:40:50 -0000 1.45.2.27 @@ -1053,7 +1053,7 @@ by this CSS selector. When a CSS selector contains double and single quotes, we won't add any of those around the selector automatically. Instead, - the user must specify them explicity, for instance + the user must specify them explicitly, for instance like this: ... -selector {'[name="o\'hara"]'}. If the selector does not contain any single or double quotes, we can let the user omit them, as for the @@ -1172,7 +1172,7 @@ CSS selector. When a CSS selector contains double and single quotes, we won't add any of those around the selector automatically. Instead, the - user must specify them explicity, for instance + user must specify them explicitly, for instance like this: ... -selector {'[name="o\'hara"]'}. If the selector does not contain any single or double quotes, we can let the user omit them, as for the Index: openacs-4/packages/acs-templating/tcl/widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/widget-procs.tcl,v diff -u -N -r1.63.2.15 -r1.63.2.16 --- openacs-4/packages/acs-templating/tcl/widget-procs.tcl 11 Mar 2021 16:59:50 -0000 1.63.2.15 +++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl 2 Sep 2021 16:40:51 -0000 1.63.2.16 @@ -1392,7 +1392,7 @@ element_reference tag_attributes } { - Render a url input widget. + Render a URL input widget. @param element_reference Reference variable to the form element @param tag_attributes HTML attributes to add to the tag Index: openacs-4/packages/acs-templating/tcl/test/data-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/test/Attic/data-procs.tcl,v diff -u -N -r1.1.2.26 -r1.1.2.27 --- openacs-4/packages/acs-templating/tcl/test/data-procs.tcl 2 Jul 2021 11:45:52 -0000 1.1.2.26 +++ openacs-4/packages/acs-templating/tcl/test/data-procs.tcl 2 Sep 2021 16:40:51 -0000 1.1.2.27 @@ -518,10 +518,10 @@ } set message "" foreach value $url_true { - aa_true "Is $value a url?" [template::data::validate url value message] + aa_true "Is $value a URL?" [template::data::validate url value message] } foreach value $url_false { - aa_false "Is $value a url?" [template::data::validate url value message] + aa_false "Is $value a URL?" [template::data::validate url value message] } } Index: openacs-4/packages/ajaxhelper/lib/ajaxhelper-template.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/lib/ajaxhelper-template.tcl,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/ajaxhelper/lib/ajaxhelper-template.tcl 23 Mar 2018 22:56:42 -0000 1.2 +++ openacs-4/packages/ajaxhelper/lib/ajaxhelper-template.tcl 2 Sep 2021 16:40:51 -0000 1.2.2.1 @@ -1,4 +1,4 @@ -# HAM : lets check ajaxhelper globals *********************** +# HAM : let's check ajaxhelper globals *********************** global ajax_helper_js_sources global ajax_helper_yui_js_sources Index: openacs-4/packages/ajaxhelper/tcl/ajax-dojo-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/tcl/ajax-dojo-procs.tcl,v diff -u -N -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/ajaxhelper/tcl/ajax-dojo-procs.tcl 14 Feb 2019 16:15:00 -0000 1.5.2.1 +++ openacs-4/packages/ajaxhelper/tcl/ajax-dojo-procs.tcl 2 Sep 2021 16:40:51 -0000 1.5.2.2 @@ -93,7 +93,7 @@ ad_proc -private ah::dojo::is_js_sources_loaded { -js_source } { - This proc will loop thru source_list and check for the presence of js_source. + This proc will loop through source_list and check for the presence of js_source. If found, this proc will return 1 If not found, this proc will return 0 Index: openacs-4/packages/ajaxhelper/tcl/ajax-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/tcl/ajax-procs.tcl,v diff -u -N -r1.18.2.3 -r1.18.2.4 --- openacs-4/packages/ajaxhelper/tcl/ajax-procs.tcl 19 Aug 2019 13:43:26 -0000 1.18.2.3 +++ openacs-4/packages/ajaxhelper/tcl/ajax-procs.tcl 2 Sep 2021 16:40:52 -0000 1.18.2.4 @@ -933,7 +933,7 @@ @param array_list a list of lists which will be constructed as the javascript array. this takes priority over sql_query parameter. - @param sql_query sql query to pass to db_list_of_lists to generate + @param sql_query SQL query to pass to db_list_of_lists to generate the array } { Index: openacs-4/packages/ajaxhelper/tcl/ajax-yahoo-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/tcl/ajax-yahoo-procs.tcl,v diff -u -N -r1.14.2.2 -r1.14.2.3 --- openacs-4/packages/ajaxhelper/tcl/ajax-yahoo-procs.tcl 12 Apr 2019 21:25:45 -0000 1.14.2.2 +++ openacs-4/packages/ajaxhelper/tcl/ajax-yahoo-procs.tcl 2 Sep 2021 16:40:52 -0000 1.14.2.3 @@ -80,7 +80,7 @@ ad_proc -private ah::yui::is_js_sources_loaded { -js_source } { - This proc will loop thru the global source_list + This proc will loop through the global source_list and check for the presence of the given js_source. If found, this proc will return 1 If not found, this proc will return 0 Index: openacs-4/packages/ajaxhelper/www/doc/acs-integration-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/www/doc/acs-integration-procs.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/ajaxhelper/www/doc/acs-integration-procs.tcl 7 Aug 2017 23:48:03 -0000 1.4 +++ openacs-4/packages/ajaxhelper/www/doc/acs-integration-procs.tcl 2 Sep 2021 16:40:52 -0000 1.4.2.1 @@ -42,7 +42,7 @@ @param params The parameters to pass to the template. Note that pass-by-reference params must be in the page namespace, they cannot be in a local procedure, or any other namespace. - @param template The template file name. + @param template The template filename. Example: @@ -75,7 +75,7 @@ @param status The HTTP status to return, by default HTTP 500 (Error) @param params The parameters to pass to the template. - @param template The template file name. + @param template The template filename. Example: Index: openacs-4/packages/assessment-portlet/tcl/assessment-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/tcl/assessment-portlet-procs.tcl,v diff -u -N -r1.7 -r1.7.2.1 --- openacs-4/packages/assessment-portlet/tcl/assessment-portlet-procs.tcl 10 Jul 2018 15:46:10 -0000 1.7 +++ openacs-4/packages/assessment-portlet/tcl/assessment-portlet-procs.tcl 2 Sep 2021 16:40:53 -0000 1.7.2.1 @@ -53,7 +53,7 @@ {-force_region ""} {-page_name "" } } { - Adds a assessment PE to the given portal. + Adds an assessment PE to the given portal. @param portal_id The page to add self to @param package_id The community with the folder @@ -79,7 +79,7 @@ {-portal_id:required} {-package_id:required} } { - Removes a assessment PE from the given page or the package_id of the + Removes an assessment PE from the given page or the package_id of the assessment package from the portlet if there are others remaining. @param portal_id The page to remove self from @@ -140,7 +140,7 @@ {-page_name ""} {-package_id:required} } { - Adds a assessment admin PE to the given portal. + Adds an assessment admin PE to the given portal. @param portal_id The page to add self to @param package_id The package_id of the assessment package @@ -158,7 +158,7 @@ ad_proc -public assessment_admin_portlet::remove_self_from_page { {-portal_id:required} } { - Removes a assessment admin PE from the given page. + Removes an assessment admin PE from the given page. } { portal::remove_element \ -portal_id $portal_id \ Index: openacs-4/packages/boomerang/tcl/boomerang-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/boomerang/tcl/boomerang-init.tcl,v diff -u -N -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/boomerang/tcl/boomerang-init.tcl 9 Feb 2020 15:26:10 -0000 1.2.2.1 +++ openacs-4/packages/boomerang/tcl/boomerang-init.tcl 2 Sep 2021 16:40:53 -0000 1.2.2.2 @@ -1,6 +1,6 @@ # # We should get the URL from the parameter and register this for every -# toplevel subsite, on which boomerang is enabled +# top-level subsite, on which boomerang is enabled # foreach url {/} { Index: openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl,v diff -u -N -r1.12 -r1.12.2.1 --- openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl 10 Jul 2018 15:52:04 -0000 1.12 +++ openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl 2 Sep 2021 16:40:53 -0000 1.12.2.1 @@ -54,7 +54,7 @@ {-portal_id:required} {-calendar_id:required} } { - Adds a admin calendar PE to the given portal. + Adds an admin calendar PE to the given portal. @param portal_id The page to add self to @param calendar_id The new calendar_id to add Index: openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl,v diff -u -N -r1.35.2.1 -r1.35.2.2 --- openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl 22 Feb 2021 15:51:52 -0000 1.35.2.1 +++ openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl 2 Sep 2021 16:40:53 -0000 1.35.2.2 @@ -16,7 +16,7 @@ ad_library { - Procedures to support the (normal, narrow) calendar portlet a.k.a. + Procedures to support the (normal, narrow) calendar portlet aka "Day Summary". Not to be confused with the "full" calendar portlet. @author arjun@openforce.net Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v diff -u -N -r1.44.2.1 -r1.44.2.2 --- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 14 Feb 2019 16:15:01 -0000 1.44.2.1 +++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 2 Sep 2021 16:40:53 -0000 1.44.2.2 @@ -59,7 +59,7 @@ template::head::add_css -href "/resources/calendar/calendar.css" template::head::add_css -alternate -href "/resources/calendar/calendar-hc.css" -title "highContrast" -# set the period_days for calendar's list view, therefore we need +# set the period_days for calendar's list view, therefore, we need # to check which instance of calendar is currently displayed if {[apm_package_installed_p dotlrn]} { set site_node [site_node::get_node_id_from_object_id -object_id [ad_conn package_id]] Index: openacs-4/packages/categories/www/cadmin/tree-order-update.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/tree-order-update.tcl,v diff -u -N -r1.14.2.1 -r1.14.2.2 --- openacs-4/packages/categories/www/cadmin/tree-order-update.tcl 20 Dec 2019 21:18:10 -0000 1.14.2.1 +++ openacs-4/packages/categories/www/cadmin/tree-order-update.tcl 2 Sep 2021 16:40:53 -0000 1.14.2.2 @@ -22,7 +22,7 @@ db_foreach get_tree "" { incr count 10 if {$parent_id eq ""} { - # need this as an anchor for toplevel categories + # need this as an anchor for top-level categories set parent_id -1 } if {[info exists sort_key($category_id)]} { @@ -36,7 +36,7 @@ set count 1 set stack [list] set done_list [list] - # put toplevel categories on stack + # put top-level categories on stack if {[info exists child(-1)]} { set stack [lsort -integer -index 0 $child(-1)] } Index: openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/Attic/xotcl-chat-procs.tcl,v diff -u -N -r1.1.2.14 -r1.1.2.15 --- openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl 14 Dec 2020 09:43:37 -0000 1.1.2.14 +++ openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl 2 Sep 2021 16:40:53 -0000 1.1.2.15 @@ -87,7 +87,7 @@ approved_p {boolean default true} creation_user {integer references parties(party_id) on delete cascade not null} creation_ip {varchar(50)} - creation_date {timestamp with time zone} + creation_date {timestamp with timezone} } ::xo::db::chat_room ad_instproc grant_creator {} { Index: openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl,v diff -u -N -r1.23.2.2 -r1.23.2.3 --- openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl 1 Oct 2020 13:44:04 -0000 1.23.2.2 +++ openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl 2 Sep 2021 16:40:54 -0000 1.23.2.3 @@ -199,13 +199,13 @@ ad_proc -public get_community_default_page {} { Returns the user default page to add the portlet to. - FIXME Should be a ad_param. + FIXME Should be an ad_param. } { return "#dotlrn.club_page_people_title#" } ad_proc -public get_subcomm_default_page {} { - FIXME Should be a ad_param. + FIXME Should be an ad_param. } { return "#dotlrn.subcomm_page_info_title#" } Index: openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl,v diff -u -N -r1.7.2.2 -r1.7.2.3 --- openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl 24 Aug 2020 15:21:46 -0000 1.7.2.2 +++ openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl 2 Sep 2021 16:40:54 -0000 1.7.2.3 @@ -34,9 +34,9 @@ unencoded_name } { - Encode the user-supplied file name with the user's ID. We do this because the homework + Encode the user-supplied filename with the user's ID. We do this because the homework folder hides files uploaded by other users and we want to avoid apparently mysterious duplicate - file name errors when two different users give their homework assignment the same name. + filename errors when two different users give their homework assignment the same name. } { return "${user_id}_$unencoded_name" Index: openacs-4/packages/dotlrn-portlet/tcl/dotlrn-members-staff-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/tcl/dotlrn-members-staff-portlet-procs.tcl,v diff -u -N -r1.12.2.2 -r1.12.2.3 --- openacs-4/packages/dotlrn-portlet/tcl/dotlrn-members-staff-portlet-procs.tcl 25 Feb 2021 12:30:25 -0000 1.12.2.2 +++ openacs-4/packages/dotlrn-portlet/tcl/dotlrn-members-staff-portlet-procs.tcl 2 Sep 2021 16:40:54 -0000 1.12.2.3 @@ -16,7 +16,7 @@ ad_library { - Procedures to supports the dotlrn "members staff" portlet a.k.a. "Staff List" + Procedures to supports the dotlrn "members staff" portlet aka "Staff List" @author arjun@openforce.net @cvs-id $Id$ Index: openacs-4/packages/evaluation/tcl/evaluation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/tcl/evaluation-procs.tcl,v diff -u -N -r1.49.2.4 -r1.49.2.5 --- openacs-4/packages/evaluation/tcl/evaluation-procs.tcl 2 Mar 2021 12:01:31 -0000 1.49.2.4 +++ openacs-4/packages/evaluation/tcl/evaluation-procs.tcl 2 Sep 2021 16:40:55 -0000 1.49.2.5 @@ -1138,7 +1138,7 @@ -path:required -folder_name:required } { - Writes all the answers of a given task in the file system. + Writes all the answers of a given task in the filesystem. } { set dir [file join ${path} ${folder_name}] Index: openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl,v diff -u -N -r1.17.2.4 -r1.17.2.5 --- openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl 2 Jul 2019 08:18:25 -0000 1.17.2.4 +++ openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl 2 Sep 2021 16:40:56 -0000 1.17.2.5 @@ -212,7 +212,7 @@ set export_vars [export_vars -form { task_id max_grade grades_gs comments_gs show_student_gs item_ids new_p_gs grades_sheet_item_id tmp_filename upload_file }] - # writing the file in the file system so we can work with it later + # writing the file in the filesystem so we can work with it later flush $file_handler close $file_handler Index: openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl,v diff -u -N -r1.6.2.4 -r1.6.2.5 --- openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl 17 Jun 2019 10:20:51 -0000 1.6.2.4 +++ openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl 2 Sep 2021 16:40:56 -0000 1.6.2.5 @@ -20,7 +20,7 @@ ad_proc -private evaluation::twt::delete_file {file_name} { - # Delete a file name + # Delete a filename file delete -force -- $file_name } Index: openacs-4/packages/forums/tcl/messages-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs.tcl,v diff -u -N -r1.59.2.25 -r1.59.2.26 --- openacs-4/packages/forums/tcl/messages-procs.tcl 1 Feb 2021 11:01:48 -0000 1.59.2.25 +++ openacs-4/packages/forums/tcl/messages-procs.tcl 2 Sep 2021 16:40:59 -0000 1.59.2.26 @@ -372,7 +372,7 @@ }] if {[db_0or1row select_message $sql -column_array row]} { set user [acs_user::get -user_id $row(user_id)] - set row(user_name) [dict get $user name] + set row(user_name) [dict get $username] set row(user_email) [dict get $user email] set row(screen_name) [dict get $user screen_name] @@ -387,7 +387,7 @@ {-state:required} } { Set the new state for a message.
    - Usually used for approval. + Usually, used for approval. } { set var_list [list \ [list message_id $message_id] \ Index: openacs-4/packages/fs-portlet/tcl/fs-contents-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/tcl/fs-contents-portlet-procs.tcl,v diff -u -N -r1.7 -r1.7.2.1 --- openacs-4/packages/fs-portlet/tcl/fs-contents-portlet-procs.tcl 11 Jul 2018 15:05:09 -0000 1.7 +++ openacs-4/packages/fs-portlet/tcl/fs-contents-portlet-procs.tcl 2 Sep 2021 16:41:00 -0000 1.7.2.1 @@ -69,7 +69,7 @@ db_transaction { # Generate the element, don't use add_element_parameters here, # since it doesn't do the right thing for multiple elements with - # the same datasource on a page. so we just use the more low level + # the same datasource on a page. So we just use the more low-level # portal::add_element set element_id [portal::add_element \ -portal_id $portal_id \ Index: openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl,v diff -u -N -r1.24.2.4 -r1.24.2.5 --- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl 10 Mar 2021 11:08:47 -0000 1.24.2.4 +++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl 2 Sep 2021 16:41:00 -0000 1.24.2.5 @@ -745,7 +745,7 @@ # append the properties into response set all_properties [list] - # hack to get the OS time zone to tack on the end of oracle timestamps + # hack to get the OS timezone to tack on the end of oracle timestamps # until we stop supporting oracle 8i set os_time_zone [clock format [clock seconds] -format %Z] db_foreach get_properties "" { Index: openacs-4/packages/proctoring-support/tcl/safe-exam-browser-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/proctoring-support/tcl/Attic/safe-exam-browser-procs.tcl,v diff -u -N -r1.1.2.7 -r1.1.2.8 --- openacs-4/packages/proctoring-support/tcl/safe-exam-browser-procs.tcl 17 Jun 2021 12:27:30 -0000 1.1.2.7 +++ openacs-4/packages/proctoring-support/tcl/safe-exam-browser-procs.tcl 2 Sep 2021 16:41:01 -0000 1.1.2.8 @@ -145,7 +145,7 @@ ad_proc -private ::proctoring::seb::require_valid_access { -object_id:required } { - Validates the proctored session using the Safe Exam Broswer keys + Validates the proctored session using the Safe Exam Browser keys configured for the object. If the client does not comply, will stop page execution and return the .seb configuration file as response. If no .seb file was cofigured, will just return a 403 Index: openacs-4/packages/ref-timezones/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ref-timezones/tcl/apm-callback-procs.tcl,v diff -u -N -r1.2.2.2 -r1.2.2.3 --- openacs-4/packages/ref-timezones/tcl/apm-callback-procs.tcl 20 Aug 2020 13:35:36 -0000 1.2.2.2 +++ openacs-4/packages/ref-timezones/tcl/apm-callback-procs.tcl 2 Sep 2021 16:41:01 -0000 1.2.2.3 @@ -22,12 +22,12 @@ 5.5.0d1 5.5.0d2 { db_load_sql_data [acs_root_dir]/packages/ref-timezones/sql/[db_driverkey ""]/upgrade/upgrade-timezones.ctl set entries [db_string _ "select count(*) from timezones"] - ns_log Notice "$entries time zones loaded" + ns_log Notice "$entries timezones loaded" } 5.9.0b1 5.9.0b2 { db_load_sql_data [acs_root_dir]/packages/ref-timezones/sql/[db_driverkey ""]/upgrade/upgrade-timezones.ctl set entries [db_string _ "select count(*) from timezones"] - ns_log Notice "$entries time zones loaded" + ns_log Notice "$entries timezones loaded" } } } Index: openacs-4/packages/survey/www/process-response.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/process-response.tcl,v diff -u -N -r1.17.2.4 -r1.17.2.5 --- openacs-4/packages/survey/www/process-response.tcl 23 Mar 2021 13:36:24 -0000 1.17.2.4 +++ openacs-4/packages/survey/www/process-response.tcl 2 Sep 2021 16:41:01 -0000 1.17.2.5 @@ -240,7 +240,7 @@ set guessed_file_type [ns_guesstype $response_value] set n_bytes [file size $tmp_filename] - # strip off the C:\directories... crud and just get the file name + # strip off the C:\directories... crud and just get the filename if {![regexp {([^/\\]+)$} $response_value match client_filename]} { # couldn't find a match set client_filename $response_value Index: openacs-4/packages/survey/www/admin/process-response.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/process-response.tcl,v diff -u -N -r1.7.2.4 -r1.7.2.5 --- openacs-4/packages/survey/www/admin/process-response.tcl 23 Mar 2021 13:36:24 -0000 1.7.2.4 +++ openacs-4/packages/survey/www/admin/process-response.tcl 2 Sep 2021 16:41:02 -0000 1.7.2.5 @@ -264,7 +264,7 @@ set guessed_file_type [ns_guesstype $response_value] set n_bytes [file size $tmp_filename] - # strip off the C:\directories... crud and just get the file name + # strip off the C:\directories... crud and just get the filename if {![regexp {([^/\\]+)$} $response_value match client_filename]} { # couldn't find a match set client_filename $response_value Index: openacs-4/packages/survey/www/admin/question-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/question-add-2.tcl,v diff -u -N -r1.8.4.2 -r1.8.4.3 --- openacs-4/packages/survey/www/admin/question-add-2.tcl 9 Feb 2020 16:10:31 -0000 1.8.4.2 +++ openacs-4/packages/survey/www/admin/question-add-2.tcl 2 Sep 2021 16:41:02 -0000 1.8.4.3 @@ -44,7 +44,7 @@ set type $survey_info(type) # create a blank form, we fill it based on the question type -# maybe put question_id:key in there if we move the processing from quesion-add-3 to this form. +# maybe put question_id:key in there if we move the processing from question-add-3 to this form. ad_form -name create-question-2 -action question-add-3 -form { {question:text(inform) {label "[_ survey.Question_Text]"} {value $question_text}} Index: openacs-4/packages/theme-zen/tcl/navigation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/theme-zen/tcl/navigation-procs.tcl,v diff -u -N -r1.10.2.2 -r1.10.2.3 --- openacs-4/packages/theme-zen/tcl/navigation-procs.tcl 21 Aug 2019 06:47:07 -0000 1.10.2.2 +++ openacs-4/packages/theme-zen/tcl/navigation-procs.tcl 2 Sep 2021 16:41:03 -0000 1.10.2.3 @@ -198,7 +198,7 @@ set control_panel_url "$dotlrn_url/$control_panel_name" if { $community_id eq "" } { - # We are not under a dotlrn community. However we could be + # We are not under a dotlrn community. However, we could be # under /dotlrn (i.e. in the user's portal) or anywhere # else on the site set link "[dotlrn::get_url]/" Index: openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl,v diff -u -N -r1.41.2.8 -r1.41.2.9 --- openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl 30 Apr 2021 17:42:53 -0000 1.41.2.8 +++ openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl 2 Sep 2021 16:41:05 -0000 1.41.2.9 @@ -308,7 +308,7 @@
  • "quoted text": text inside quote marks will be converted to terms separated by <-> operators, as if processed by phraseto_tsquery.
  • OR: logical or will be converted to the | operator.
  • -
  • -: the logical not operator, converted to the the ! operator.
  • +
  • -: the logical not operator, converted to the ! operator.
  • For further documentation see also: https://www.postgresql.org/docs/11/textsearch-controls.html#TEXTSEARCH-PARSING-QUERIES Index: openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl,v diff -u -N -r1.5.2.10 -r1.5.2.11 --- openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 30 Apr 2021 17:42:53 -0000 1.5.2.10 +++ openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 2 Sep 2021 16:41:06 -0000 1.5.2.11 @@ -27,9 +27,9 @@ if {[db_0or1row object_details { select fti from txt where object_id=:object_id }]} { - set splitted_fti [split $fti '] + set split_fti [split $fti '] foreach keyword $keywords { - if {$keyword ni $splitted_fti} { + if {$keyword ni $split_fti} { aa_log "Keyword ($keyword) not found in fti: $fti" return false } else { Index: openacs-4/packages/xooauth/tcl/lti-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/Attic/lti-procs.tcl,v diff -u -N -r1.1.2.5 -r1.1.2.6 --- openacs-4/packages/xooauth/tcl/lti-procs.tcl 7 Aug 2021 09:46:40 -0000 1.1.2.5 +++ openacs-4/packages/xooauth/tcl/lti-procs.tcl 2 Sep 2021 16:41:07 -0000 1.1.2.6 @@ -206,7 +206,7 @@ # 3) from configure file section /lti # # Iterate over class hierarchy until xo::lti::LTI is - # reached and set paramters. + # reached and set parameters. # foreach c [:info precedence] { if {$c eq [current class]} { 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 -N -r1.148.2.36 -r1.148.2.37 --- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 23 Mar 2021 14:46:16 -0000 1.148.2.36 +++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 2 Sep 2021 16:41:08 -0000 1.148.2.37 @@ -75,7 +75,7 @@ switch -- $type { string { set type text } long_text { set type text } - date { set type "timestamp with time zone" } + date { set type "timestamp with timezone" } ltree { set type [expr {[::xo::dc has_ltree] ? "ltree" : "text" }] } default { return [next] } }