From b501385ad1ac0a20b29f14ac146657653a5ddb06 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Wed, 7 Oct 2009 14:51:52 +0200
Subject: Fix yet another typo.

Ignore-this: d4d7bdc04c395a58190df274ab38e63d

darcs-hash:2653cda62f24b3fa3ed94c6385b7dc967b378e33
---
 utils.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'utils.lisp')

diff --git a/utils.lisp b/utils.lisp
index e73b7e4..89c3bf4 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -331,7 +331,7 @@ ELEMENT-TYPE as the stream's."
     (when *if-modified-since*
       (let* ((date-recognisers (mapcar #'cybertiggyr-time::make-fmt-recognizer '("%A, %d-%B-%y %H:%M:%S GMT" "%A, %d %B %Y %H:%M:%S GMT" "%A %B %d %H:%M:%S %Y")))
              (requested-time (cybertiggyr-time:parse-time *if-modified-since* date-recognisers)))
-        (when (and (integerp time) (>= requested-time (compute-journal-last-modified-date)))
+        (when (and (integerp requested-time) (>= requested-time (compute-journal-last-modified-date)))
           (http-add-header "Status: 304 Not Modified")
           (http-send-headers)
           (ext:quit 0))))
-- 
cgit v1.2.3