Index: openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl,v
diff -u -r1.10.2.16 -r1.10.2.17
--- openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl	4 Oct 2021 09:37:01 -0000	1.10.2.16
+++ openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl	7 Oct 2021 15:42:45 -0000	1.10.2.17
@@ -35,6 +35,7 @@
         :property parameter:required
         :property package_key:required
         :property maxentry:integer
+        :property {timeout 5m}
         :property {default_size:integer 10000}
 
         :method cache_name {key} {
@@ -126,6 +127,7 @@
                 # Create a cache.
                 #
                 ns_cache_create \
+                    -timeout ${:timeout} \
                     {*}[expr {[info exists :maxentry] ? "-maxentry ${:maxentry}" : ""}] \
                     $name $size
             }