Index: openacs-4/packages/acs-lang/tcl/locale-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/locale-procs.xql,v diff -u -r1.10 -r1.11 --- openacs-4/packages/acs-lang/tcl/locale-procs.xql 27 Feb 2005 22:45:39 -0000 1.10 +++ openacs-4/packages/acs-lang/tcl/locale-procs.xql 16 Nov 2017 09:37:57 -0000 1.11 @@ -1,6 +1,17 @@ + + + select cast( + to_char( + current_timestamp at time zone :system_timezone - current_timestamp at time zone 'UTC' + , 'HH24MI') + as float) / 100 + from dual + + + select default_locale