--- parser3/tests/164.html	2007/04/23 14:45:35	1.1
+++ parser3/tests/164.html	2007/04/23 15:16:37	1.4
@@ -7,10 +7,11 @@ $hf[^hashfile::open[$sName]]
 ^checkFiles[$sName]
 
 <hr />
-Storing 3 values and show all items...<br />
-^put[$hf;1;value 1](1)
-^put[$hf;2;value 2](3)
-^put[$hf;3;value 3](4)
+Storing 4 values and show all items...<br />
+^put[$hf;0;value 0](2)
+^put[$hf;1;value 1;^date::now(+2/24/60/60)]
+^put[$hf;2;value 2](4)
+^put[$hf;3;value 3](5)
 ^print[$hf]
 
 <hr />
@@ -28,8 +29,8 @@ Removing one value and show all items...
 ^print[$hf]
 
 <hr />
-Waiting for a 2 secs and show all items...
-^sleep(2)
+Waiting for a 3 secs and show all items...
+^sleep(3)
 ^print[$hf]
 
 <hr />
@@ -46,7 +47,7 @@ Delete files and check if they exists...
 
 <hr />
 Put value and check auto re-opening...
-^put[$hf;1;value 1](1)
+^put[$hf;1;value 1]
 ^checkFiles[$sName]
 
 # finalizing: remove files for make next test start working well
@@ -54,10 +55,16 @@ Put value and check auto re-opening...
 
 
 
-@put[hf;sKey;sValue;iTime]
+@put[hf;sKey;sValue;uExpires]
 $hf.$sKey[
 	$.value[$sValue]
-	$.expires($iTime/24/60/60)
+	^if(def $uExpires){
+		^if($uExpires is "date"){
+			$.expires[$uExpires]
+		}{
+			$.expires($uExpires/24/60/60)
+		}
+	}
 ]