Index: openacs-4/packages/xowiki/tcl/folder-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/folder-procs.tcl,v
diff -u -r1.55.2.36 -r1.55.2.37
--- openacs-4/packages/xowiki/tcl/folder-procs.tcl	17 Jul 2020 13:49:19 -0000	1.55.2.36
+++ openacs-4/packages/xowiki/tcl/folder-procs.tcl	17 Jul 2020 13:55:01 -0000	1.55.2.37
@@ -672,14 +672,8 @@
       set extra_where_clause "ci.name like '${lang}:%'"
 
       #
-      # If the folder has a property "langstring" assume that the
-      # content is a dict containing multiple attributes in multiple
-      # languages.
+      # Update the title to a language-specific value
       #
-      # One should define a form-field for langstrings that convert
-      # some user-friendly format into the intrep of the dict, which
-      # can be efficiently processed.
-      #
       $current_folder update_langstring_property _title $lang
     }
 
Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.542.2.77 -r1.542.2.78
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	17 Jul 2020 13:49:19 -0000	1.542.2.77
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	17 Jul 2020 13:55:01 -0000	1.542.2.78
@@ -4668,6 +4668,22 @@
     return [expr $wc(tcl)]
   }
 
+  # If the folder has a property "langstring" assume that the
+  # content is a dict containing multiple attributes in multiple
+  # languages.
+  #
+  #    _title {en {This is the Title} de {Das ist der Titel}}
+  #
+  # This can be used by update_langstring_property to set arbitaries
+  # properties to language-specific value. The follogwing command updates
+  # the value of the "_title" property:
+  #
+  #    $page update_langstring_property _title $lang
+  #
+  # One should define a form-field for langstrings that convert
+  # some user-friendly format into the intrep of the dict, which
+  # can be efficiently processed.
+
   FormPage instproc langstring {attname lang {default ""}} {
     set result $default
     if {[:exists_property langstring]} {