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.23 -r1.114.2.24 --- openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl 9 Apr 2021 14:01:29 -0000 1.114.2.23 +++ openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl 9 Apr 2021 17:17:52 -0000 1.114.2.24 @@ -1854,22 +1854,22 @@ } } -ad_proc -deprecated auth::authentication::Authenticate args { - Invoke the Authenticate service contract operation for the given authority. +# ad_proc -deprecated auth::authentication::Authenticate args { +# Invoke the Authenticate service contract operation for the given authority. - DEPRECATED: this used to be a private api, however, it could be - made public, as it calls only public api itself and provides some - convenience. Unfortunately, it has been named in camelcase, so we - have to create a new alias and deprecate this one. +# DEPRECATED: this used to be a private api, however, it could be +# made public, as it calls only public api itself and provides some +# convenience. Unfortunately, it has been named in camelcase, so we +# have to create a new alias and deprecate this one. - @see auth::authentication::authenticate +# @see auth::authentication::authenticate - @param authority_id The ID of the authority to ask to verify the user. - @param username Username of the user. - @param password The password as the user entered it. -} { - return [auth::authentication::authenticate {*}$args] -} +# @param authority_id The ID of the authority to ask to verify the user. +# @param username Username of the user. +# @param password The password as the user entered it. +# } { +# return [auth::authentication::authenticate {*}$args] +# } ##### #