From d62e0697104288ebae928f4723d6640b00741201 Mon Sep 17 00:00:00 2001
From: interp <interp>
Date: Wed, 21 Jul 2004 18:59:18 +0000
Subject: [PATCH] use (cdr head) instead of (cdar cache), it's clearer

---
 scheme/httpd/surflets/bindings.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scheme/httpd/surflets/bindings.scm b/scheme/httpd/surflets/bindings.scm
index c94bcd5..1ab4bc1 100644
--- a/scheme/httpd/surflets/bindings.scm
+++ b/scheme/httpd/surflets/bindings.scm
@@ -61,7 +61,7 @@
 		      (s-req (weak-pointer-ref (car head))))
 		 (if s-req
 		     (if (eq? s-req surflet-request)
-			 (cdar cache)	; request is cached
+			 (cdr head)	; request is cached
 			 (loop (cdr cache))) ; request isn't cached
 		     (begin
 		       ;; request object is gone ==> remove it from list