Index: openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl	29 Dec 2017 11:26:06 -0000	1.8
+++ openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl	19 Dec 2019 15:41:44 -0000	1.8.2.1
@@ -1,10 +1,15 @@
-# @input message_key
-# @input package_key
-#
-# @author Peter Marklund (peter@collaboraid.biz)
-# @author Lars Pind (lars@collaboraid.biz)
-# @cvs-id $Id$
+ad_include_contract {
+    Display occurrences of specified message key. Used while
+    translating.
 
+    @author Peter Marklund (peter@collaboraid.biz)
+    @author Lars Pind (lars@collaboraid.biz)
+    @cvs-id $Id$
+} {
+    message_key:token,notnull
+    package_key:token,notnull
+}
+
 set full_key "$package_key.$message_key"
 
 # Since acs-lang.localization- messages use the lc_get proc (that