Index: openacs-4/packages/acs-tcl/acs-tcl.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/acs-tcl.info,v diff -u -N -r1.74 -r1.75 --- openacs-4/packages/acs-tcl/acs-tcl.info 21 Jan 2018 18:51:16 -0000 1.74 +++ openacs-4/packages/acs-tcl/acs-tcl.info 22 Jan 2018 00:17:04 -0000 1.75 @@ -9,7 +9,7 @@ f t - + OpenACS The Kernel Tcl API library. 2017-08-06 @@ -18,8 +18,8 @@ GPL version 2 3 - - + + Index: openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl 19 Jan 2018 21:22:15 -0000 1.6 +++ openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl 22 Jan 2018 00:17:04 -0000 1.7 @@ -1,29 +1,25 @@ ad_library { - Provides a variety of non-ACS-specific utilities, including - the procs to support the who's online feature. + Provides a collection of deprecated procs to provide backward + compatibility for sites who have not yet removed calls to the + dprecated functions. - @author Various (acs@arsdigita.com) - @creation-date 13 April 2000 + In order to skip loading of deprecated code, use the following + snippet in your config file + + ns_section ns/server/${server}/acs + ns_param WithDeprecatedCode 0 + @cvs-id $Id$ } -# -# In order to skip loading of deprecated code, use the following -# snippet in your config file -# -# ns_section ns/server/${server}/acs -# ns_param WithDeprecatedCode 0 -# -if {![ns_config ns/server/[ns_info server]/acs WithDeprecatedCode 1]} { - ns_log notice "deprecated-procs: skip depreacted code" +if {![ad_with_deprecated_code_p]} { + ns_log notice "deprecated-procs: skip deprecated code" return } ns_log notice "deprecated-procs include depreacted code" -namespace eval util {} - ad_proc -public -deprecated ad_set_typed_form_variable_filter { url_pattern args