diff --git a/scheme/httpd/file-dir-handler.scm b/scheme/httpd/file-dir-handler.scm
index 4e6f22e..c804598 100644
--- a/scheme/httpd/file-dir-handler.scm
+++ b/scheme/httpd/file-dir-handler.scm
@@ -443,7 +443,7 @@
 				   '())
 			       (list
 				(cons 'last-modified
-				      (time->http-date-string
+				      (rfc822-time->string
 				       (file-info:mtime info)))
 				(cons 'content-length (file-info:size info))))
 		       (make-writer-body
diff --git a/scheme/packages.scm b/scheme/packages.scm
index b246468..8e6fc1b 100644
--- a/scheme/packages.scm
+++ b/scheme/packages.scm
@@ -671,6 +671,7 @@
 	htmlout
 	crlf-io
 	(subset srfi-13 (string-join))
+	(subset rfc822 (rfc822-time->string))
 	sunet-utilities			; dotdot-check, copy-inport->outport
 	conditions
 	handle-fatal-error