--- trunk/MWS_swish.pm	2004/05/08 00:54:16	21
+++ trunk/MWS_swish.pm	2004/05/08 02:21:50	23
@@ -85,7 +85,7 @@
 			}
 		}
 
-		foreach my $p (qw(subject body date)) {
+		foreach my $p (qw(subject body date date_utime)) {
 			$self->{cache}->{$id}->{$p} = p($r,$p);
 		}