summaryrefslogtreecommitdiff
path: root/main.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-09-27 20:45:43 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-09-27 20:45:43 +0200
commit29945a7ea76b60795b8dc6d6267924bfa4459357 (patch)
treee55d91d7817a535ab3963cdeb221bce80e7c198f /main.lisp
parentee4b13e5dd53dd0886aacac3d6ec969b99db5524 (diff)
Add some missing CGI environment variables.
darcs-hash:f77db90245b04c308573fb44b1788874af599a24
Diffstat (limited to 'main.lisp')
-rw-r--r--main.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/main.lisp b/main.lisp
index da926a4..0684a60 100644
--- a/main.lisp
+++ b/main.lisp
@@ -92,6 +92,9 @@
#+clisp
(defun cl-user::script-main ()
+ (dolist (env-var '("HTTP_CACHE_CONTROL" "HTTP_IF_MODIFIED_SINCE"))
+ (pushnew env-var http::*http-env-vars*))
+ (http:http-init)
(handler-bind
((error #'
(lambda (e)