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.8 -r1.1.2.9
--- openacs-4/packages/acs-templating/tcl/test/util-procs.tcl	29 Aug 2022 14:50:37 -0000	1.1.2.8
+++ openacs-4/packages/acs-templating/tcl/test/util-procs.tcl	28 Feb 2023 07:26:09 -0000	1.1.2.9
@@ -9,6 +9,30 @@
 aa_register_case -cats {
     api
     smoke
+} -procs {
+    template::util::write_file
+    template::util::read_file
+    template::util::set_file_encoding
+} read_write_file {
+    Test utilities to read/write files.
+} {
+    set tmpfile [ns_config ns/parameters tmpdir]/__test_acs_templating_read_write_file.txt
+
+    foreach v {
+        avalue
+        anötervalue
+        1234
+        &scene
+    } {
+        template::util::write_file $tmpfile $v
+        aa_equals "In/out from file returns the same" \
+            [template::util::read_file $tmpfile] $v
+    }
+}
+
+aa_register_case -cats {
+    api
+    smoke
     production_safe
 } -procs {
     template::util::get_opts