Index: openacs-4/packages/acs-lang/www/admin/lookups-include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/lookups-include.tcl,v
diff -u -N -r1.5 -r1.5.2.1
--- openacs-4/packages/acs-lang/www/admin/lookups-include.tcl	7 Aug 2017 23:47:57 -0000	1.5
+++ openacs-4/packages/acs-lang/www/admin/lookups-include.tcl	19 Dec 2019 15:37:14 -0000	1.5.2.1
@@ -1,4 +1,9 @@
-# Include takes arguments full_key and message_key_list
+ad_include_contract {
+    Display message key occurrences on the system.
+} {
+    package_key:token,notnull
+    message_key_list:notnull
+}
 
 set full_key_pattern "${package_key}.([join $message_key_list "|"])"