Index: openacs-4/packages/acs-templating/tcl/currency-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/currency-procs.tcl,v diff -u -N -r1.15.2.4 -r1.15.2.5 --- openacs-4/packages/acs-templating/tcl/currency-procs.tcl 27 Nov 2016 12:19:35 -0000 1.15.2.4 +++ openacs-4/packages/acs-templating/tcl/currency-procs.tcl 13 Feb 2017 14:27:02 -0000 1.15.2.5 @@ -199,7 +199,7 @@ # Erase leading zeroes from the value, but make sure that 00 # is not completely erased - set value [template::util::leadingTrim $value] + set value [util::trim_leading_zeros $value] set format [lindex $currency_list 5]