Index: openacs-4/packages/acs-authentication/tcl/authentication-procs-aolserver.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs-aolserver.tcl,v
diff -u -r1.4 -r1.4.2.1
--- openacs-4/packages/acs-authentication/tcl/authentication-procs-aolserver.tcl	29 Jun 2018 17:27:18 -0000	1.4
+++ openacs-4/packages/acs-authentication/tcl/authentication-procs-aolserver.tcl	5 Oct 2021 15:43:09 -0000	1.4.2.1
@@ -97,7 +97,8 @@
 ad_proc -private ::auth::login_attempts::all_entries {}  {
     Get all login attempts
 
-    @return list {key number_of_attempts timeout}
+    @return list of triples in the form {key1 timeout1
+            number_of_attempts1 key2 ...}
 } {
 
     set result [list]
Index: openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl,v
diff -u -r1.5.2.2 -r1.5.2.3
--- openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl	2 Sep 2021 16:40:49 -0000	1.5.2.2
+++ openacs-4/packages/acs-authentication/tcl/authentication-procs-naviserver.tcl	5 Oct 2021 15:43:09 -0000	1.5.2.3
@@ -63,7 +63,8 @@
 ad_proc -private ::auth::login_attempts::all_entries {}  {
     Get all login attempts
 
-    @return list {key number_of_attempts timeout ... }
+    @return list of triples in the form {key1 timeout1
+            number_of_attempts1 key2 ...}
 } {
 
     set result [list]