Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.118.2.12 -r1.118.2.13
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	12 Mar 2016 13:43:56 -0000	1.118.2.12
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	15 Mar 2016 20:15:41 -0000	1.118.2.13
@@ -491,11 +491,11 @@
     set expireTime [parameter::get -package_id [ad_acs_kernel_id] -parameter ResourcesExpireInterval -default 0]
     if {$expireTime != 0} {
         if {![string is integer -strict $expireTime]} {
-            if {[regexp {^(\d)+d} $expireTime _ t]} {
+            if {[regexp {^(\d+)d} $expireTime _ t]} {
                 set expireTime [expr {60*60*24*$t}]
-            } elseif {[regexp {^(\d)+h} $expireTime _ t]} {
+            } elseif {[regexp {^(\d+)h} $expireTime _ t]} {
                 set expireTime [expr {60*60*$t}]
-            } elseif {[regexp {^(\d)+m} $expireTime _ t]} {
+            } elseif {[regexp {^(\d+)m} $expireTime _ t]} {
                 set expireTime [expr {60*$t}]
             } else {
                 ns_log error "invalid expire time '$expireTime' specified"