Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.126.2.92 -r1.126.2.93
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	23 May 2023 12:36:37 -0000	1.126.2.92
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	25 May 2023 09:19:09 -0000	1.126.2.93
@@ -429,11 +429,14 @@
     return $result
 }
 
-ad_proc sec_login_get_external_registry {} {
-    #
-    # If the login was issued from an external_registry, use this
-    # as well for refreshing.
-    #
+ad_proc -public sec_login_get_external_registry {} {
+
+    If the login was issued from an external_registry, use this as
+    well for refreshing.
+
+    @return registry object or the empty string when not applicable
+
+} {
     set external_registry ""
     if {[ns_conn isconnected]} {
         set external_registry [dict get [sec_login_read_cookie] external_registry]