scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

use (cdr head) instead of (cdar cache), it's clearer

This commit is contained in:
interp 2004-07-21 18:59:18 +00:00
parent 582e07bb18
commit d62e069710
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/httpd/surflets/bindings.scm
View File

@ -61,7 +61,7 @@
(s-req (weak-pointer-ref (car head)))) (s-req (weak-pointer-ref (car head))))
(if s-req (if s-req
(if (eq? s-req surflet-request) (if (eq? s-req surflet-request)
(cdar cache) ; request is cached (cdr head) ; request is cached
(loop (cdr cache))) ; request isn't cached (loop (cdr cache))) ; request isn't cached
(begin (begin
;; request object is gone ==> remove it from list ;; request object is gone ==> remove it from list