Index: openacs-4/packages/acs-tcl/tcl/object-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/object-procs.tcl,v
diff -u -r1.14.2.9 -r1.14.2.10
--- openacs-4/packages/acs-tcl/tcl/object-procs.tcl	29 Jul 2022 18:53:40 -0000	1.14.2.9
+++ openacs-4/packages/acs-tcl/tcl/object-procs.tcl	29 Jul 2022 18:54:26 -0000	1.14.2.10
@@ -13,7 +13,7 @@
 ad_proc -private acs_lookup_magic_object_no_cache { name } {
     Non memoized version of acs_magic_object.
 
-    @return the magic object's object ID 
+    @return the magic object's object ID
 
     @see acs_magic_object
 } {
@@ -23,7 +23,7 @@
 ad_proc -private -deprecated acs_lookup_magic_object { name } {
     Non memoized version of acs_magic_object.
 
-    @return the magic object's object ID 
+    @return the magic object's object ID
 
     @see acs_magic_object
 } {
@@ -66,7 +66,7 @@
     } -default ""]
 }
 
-ad_proc -public acs_object::get { 
+ad_proc -public acs_object::get {
     {-object_id:required}
     {-array}
     {-element}
@@ -81,7 +81,7 @@
 
     If called with "-element" it returns the denoted element (similar
     to e.g. "party::get").
-    
+
     @param array An array in the caller's namespace into which the info should be delivered (upvared)
     @param element to be returned
     @param object_id for which the information should be retrieved
@@ -122,9 +122,9 @@
 
     @author Malte Sussdorff (malte.sussdorff@cognovis.de)
     @creation-date 2006-08-10
-    
+
     @param object_id the object to get the package_id for
-    
+
     @return package_id of the object. Empty string if the package_id is not stored
 } {
     return [util_memoize [list acs_object::package_id_not_cached -object_id $object_id]]
@@ -137,16 +137,16 @@
 
     @author Malte Sussdorff (malte.sussdorff@cognovis.de)
     @creation-date 2006-08-10
-    
+
     @param object_id the object to get the package_id for
-    
+
     @return package_id of the object. Empty string if the package_id is not stored
 } {
     return [db_string get_package_id {} -default ""]
 }
 
 
-ad_proc -public acs_object::get_element { 
+ad_proc -public acs_object::get_element {
     {-object_id:required}
     {-element:required}
 } {