Index: openacs-4/packages/acs-lang/lib/conflict-link.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/lib/conflict-link.tcl,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/packages/acs-lang/lib/conflict-link.tcl	7 Aug 2017 23:47:56 -0000	1.3
+++ openacs-4/packages/acs-lang/lib/conflict-link.tcl	19 Dec 2019 15:19:58 -0000	1.3.2.1
@@ -1,25 +1,15 @@
-# Optional parameters:
-#
-# package_key
-# locale
-
-# Default params to empty string
-# and build the link export list
-set link_export_list [list]
-foreach param {package_key locale} {
-    if { ![info exists $param] } {
-        set $param ""
-    } else {
-        # param provided
-        lappend link_export_list $param
-    }
+ad_include_contract {
+    Display the link to conflicting message keys
+} {
+    {package_key:token ""}
+    {locale:token ""}
 }
 
 set conflict_count [lang::message::conflict_count \
                         -package_key $package_key \
                         -locale $locale]
 
-set message_conflicts_url [export_vars -base message-conflicts $link_export_list]
+set message_conflicts_url [export_vars -base message-conflicts -no_empty {package_key locale}]
 
 # Local variables:
 #    mode: tcl
Index: openacs-4/packages/acs-lang/lib/messages-to-translate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/lib/messages-to-translate.tcl,v
diff -u -r1.11 -r1.11.2.1
--- openacs-4/packages/acs-lang/lib/messages-to-translate.tcl	24 Apr 2018 14:28:55 -0000	1.11
+++ openacs-4/packages/acs-lang/lib/messages-to-translate.tcl	19 Dec 2019 15:28:02 -0000	1.11.2.1
@@ -1,3 +1,7 @@
+ad_include_contract {
+    Display messages to translate when translator mode is enabled.
+}
+
 set locale [ad_conn locale]
 
 set display_p [expr {[lang::util::translator_mode_p] && [ad_conn locale] ne "en_US" }]