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