Index: openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl,v
diff -u -N -r1.54.2.10 -r1.54.2.11
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	27 Aug 2020 12:53:11 -0000	1.54.2.10
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	2 Sep 2020 16:48:48 -0000	1.54.2.11
@@ -807,7 +807,9 @@
 	}
 
 	# Register the language keys
-        lang::message::register $locale $package_key $message_key $text
+        lang::message::register \
+            -object_id $object_id \
+            $locale $package_key $message_key $text
 
 	return "#${package_key}.${message_key}#"
     } else {