picolisp

commit cb53a8bf7cb8d0fa3eacd6bbdee869561828b4a4
parent 32eeb8416f5407400a8f334d559f7f92fab4d53d
Author: Alexander Burger <abu@software-lab.de>
Date:   Thu, 24 May 2012 19:03:00 +0200

Minor: Increased some 'max-age' defaults
Diffstat:
M
lib/http.l
 | 
10
+++++-----

1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lib/http.l b/lib/http.l
@@ -1,4 +1,4 @@
-# 21mar12abu
+# 24may12abu
 # (c) Software Lab. Alexander Burger
 
 # *Home *Gate *Host *Port *Port1 *Port% *Http1 *Chunked
@@ -20,18 +20,18 @@
    (`(chop "gif") "image/gif" 3600)
    (`(chop "tif") "image/tiff" 3600)
    (`(chop "tiff") "image/tiff" 3600)
-   (`(chop "bmp") "image/bmp" 3600)
-   (`(chop "png") "image/png" 3600)
+   (`(chop "bmp") "image/bmp" 86400)
+   (`(chop "png") "image/png" 86400)
    (`(chop "jpg") "image/jpeg" 3600)
    (`(chop "jpeg") "image/jpeg" 3600)
    (`(chop "txt") "text/octet-stream" 1 T)
    (`(chop "csv") "text/csv; charset=utf-8" 1 T)
    (`(chop "css") "text/css" 3600)
-   (`(chop "js") "application/x-javascript" 3600)
+   (`(chop "js") "application/x-javascript" 86400)
    (`(chop "ps") "application/postscript" 1)
    (`(chop "pdf") "application/pdf" 1)
    (`(chop "zip") "application/zip" 1)
-   (`(chop "jar") "application/java-archive" 3600) )
+   (`(chop "jar") "application/java-archive" 86400) )
 
 (de mime (S . @)
    (let L (chop S)