Index: openacs-4/packages/acs-lang/tcl/locale-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/locale-procs.tcl,v
diff -u -r1.51.2.20 -r1.51.2.21
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	15 Jul 2024 12:04:49 -0000	1.51.2.20
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	6 Aug 2024 09:43:17 -0000	1.51.2.21
@@ -32,7 +32,7 @@
 
 ad_proc -public lang::system::site_wide_locale {
 } {
-    Get the site wide system locale setting.
+    Get the site-wide system locale setting.
 } {
     set parameter_locale [parameter::get \
                 -package_id [apm_package_id_from_key "acs-lang"] \
@@ -278,7 +278,7 @@
 ad_proc -public lang::user::site_wide_locale {
     {-user_id ""}
 } {
-    Get the user's preferred site wide locale.
+    Get the user's preferred site-wide locale.
 } {
     # default to current user
     if { $user_id eq "" } {
@@ -297,7 +297,7 @@
 ad_proc -private lang::user::site_wide_locale_not_cached {
     user_id
 } {
-    Get the user's preferred site wide locale.
+    Get the user's preferred site-wide locale.
 } {
     set system_locale [lang::system::site_wide_locale]
 
@@ -545,7 +545,7 @@
         set locale [lang::system::package_level_locale $package_id]
     }
 
-    # if that does not exist use user's site wide locale
+    # if that does not exist use user's site-wide locale
 
     if { $locale eq "" } {
         set locale [lang::user::site_wide_locale -user_id $user_id]
@@ -557,7 +557,7 @@
         set locale [lang::conn::browser_locale]
     }
 
-    # if that does not exist use system's site wide locale
+    # if that does not exist use system's site-wide locale
 
     if { $locale eq "" } {
         set locale [lang::system::site_wide_locale]