Index: openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl,v
diff -u -r1.114.2.17 -r1.114.2.18
--- openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	11 Mar 2021 14:26:59 -0000	1.114.2.17
+++ openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	23 Mar 2021 13:16:28 -0000	1.114.2.18
@@ -1342,7 +1342,7 @@
         -email_verified_p "t"
 }
 
-ad_proc -private auth::verify_account_status {} {
+ad_proc -public auth::verify_account_status {} {
     Verify the account status of the current user,
     and set [ad_conn account_status] appropriately.
 } {
@@ -1351,8 +1351,6 @@
 }
 
 
-
-
 #####
 #
 # auth namespace private procs