Index: openacs-4/packages/acs-lang/tcl/localization-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/localization-procs.tcl,v diff -u -N -r1.29.2.5 -r1.29.2.6 --- openacs-4/packages/acs-lang/tcl/localization-procs.tcl 10 Aug 2019 15:10:51 -0000 1.29.2.5 +++ openacs-4/packages/acs-lang/tcl/localization-procs.tcl 20 Nov 2019 13:24:52 -0000 1.29.2.6 @@ -198,15 +198,31 @@ return [lc_sepfmt $out $grouping $sep] } -ad_proc -public clock_to_ansi { +ad_proc -deprecated clock_to_ansi { seconds } { Convert a time in the Tcl internal clock seconds format to ANSI format, usable by lc_time_fmt. + DEPRECATED: this proc does not comply with naming convention + enforced by acs-tcl.naming__proc_naming automated test + @author Lars Pind (lars@pinds.com) @return ANSI (YYYY-MM-DD HH24:MI:SS) formatted date. @see lc_time_fmt + @see lc_clock_to_ansi } { + return [lc_clock_to_ansi $seconds] +} + +ad_proc -public lc_clock_to_ansi { + seconds +} { + Convert a time in the Tcl internal clock seconds format to ANSI format, usable by lc_time_fmt. + + @author Lars Pind (lars@pinds.com) + @return ANSI (YYYY-MM-DD HH24:MI:SS) formatted date. + @see lc_time_fmt +} { return [clock format $seconds -format "%Y-%m-%d %H:%M:%S"] }