Index: openacs-4/packages/acs-templating/tcl/test/util-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/test/Attic/util-procs.tcl,v diff -u -r1.1.2.6 -r1.1.2.7 --- openacs-4/packages/acs-templating/tcl/test/util-procs.tcl 29 Aug 2022 12:54:44 -0000 1.1.2.6 +++ openacs-4/packages/acs-templating/tcl/test/util-procs.tcl 29 Aug 2022 14:30:37 -0000 1.1.2.7 @@ -76,34 +76,6 @@ smoke production_safe } -procs { - template::util::nvl -} nvl { - Test template::util::nvl - - @author Héctor Romojaro - @creation-date 30 June 2021 -} { - set values_result { - {0 5} 0 - {"" la} la - {"" ""} {} - {this not} this - {this ""} this - } - dict for {values result} $values_result { - set value [lindex $values 0] - set value_if_nil [lindex $values 1] - aa_equals "Value: $value, if nil: $value_if_nil" \ - [template::util::nvl $value $value_if_nil] \ - $result - } -} - -aa_register_case -cats { - api - smoke - production_safe -} -procs { template::util::get_url_directory } get_url_directory { Test template::util::get_url_directory