Update of /project/closure/cvsroot/closure/src/net In directory common-lisp.net:/tmp/cvs-serv17830/net
Modified Files: http.lisp Log Message: More removal of spurious debugging output, and conditionalization of some output on *debug-tables*
Date: Tue Jul 19 22:42:09 2005 Author: emarsden
Index: closure/src/net/http.lisp diff -u closure/src/net/http.lisp:1.7 closure/src/net/http.lisp:1.8 --- closure/src/net/http.lisp:1.7 Sun Jul 17 11:44:40 2005 +++ closure/src/net/http.lisp Tue Jul 19 22:42:08 2005 @@ -529,6 +529,9 @@ ;; xxx when exactly to cache? (and her-date her-expires (> her-expires her-date)))))) + ;; the logic below is incomplete; it should also be looking at Cache-control: headers + ;; emarsden2005-07-19 + #+(and) (when cache-p (unless really-cache-p (warn "~A will not be cached; cache-p = ~S; header: ~S"