Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

bug20472. Add compatibility with inflate.003 patch.

Simply note that :skip-gzip-header has been deprecated as of the
code/inflate.003 patch. Stop using this keyword argument when
building AllegroServe with Allegro CL 9.0.

Are there user visible changes in this commit? no

Are tests included for new features?  no new features

Tests run:  make test

Change-Id: Ib43f5e898603479a69eb822a99b49403693d6c7d
  • Loading branch information...
commit ee062f5e8aea19dbd34fbb85056df7793869cb26 1 parent 8de5f06
Mikel Bancroft authored
Showing with 13 additions and 8 deletions.
  1. +9 −5 client.cl
  2. +1 −1  main.cl
  3. +3 −2 packages.cl
View
14 client.cl
@@ -244,11 +244,15 @@
; if data is content-encoded, then decode
(if* (client-request-content-encoding creq)
- then (setq socket
- (make-instance 'net.aserve::inflate-stream
- :input-handle socket
- :skip-gzip-header t
- :content-length (and (integerp left) left)))
+ then (setq socket (make-instance
+ 'net.aserve::inflate-stream
+ :input-handle socket
+ ;; bug20472. :skip-gzip-header deprecated
+ ;; in code/inflate.003 patch for 8.2
+ ;; and will be gone in 9.0.
+ #-(version>= 9 0) :skip-gzip-header
+ #-(version>= 9 0) t
+ :content-length (and (integerp left) left)))
(setf (client-request-bytes-left creq) :unknown))
(setf (client-request-response-stream creq) socket))))
View
2  main.cl
@@ -38,7 +38,7 @@
#+ignore
(check-smp-consistency)
-(defparameter *aserve-version* '(1 3 11))
+(defparameter *aserve-version* '(1 3 12))
(eval-when (eval load)
(require :sock)
View
5 packages.cl
@@ -1,5 +1,5 @@
#+(version= 8 2)
-(sys:defpatch "aserve" 11
+(sys:defpatch "aserve" 12
"v1: version 1.2.67, implement keep-alive in allegroserve client;
v2: 1.2.68, obey keep-alive requests for PUT and POST requests;
v3: 1.2.69, make logging though method specialized on wserver class;
@@ -16,7 +16,8 @@ v7: 1.3.7: Add :default-actions to webactions,
v8: 1.3.8: fix problem w/response handler using string output streams;
v9: 1.3.9: speed up unchunking-streams;
v10: 1.3.10: fix buffer boundary error in unchunking-streams.
-v11: 1.3.11: fix log reporting of content-length when using keep-alive."
+v11: 1.3.11: fix log reporting of content-length when using keep-alive.
+v12: 1.3.12: make aserve compatible with patch inflate.003."
:type :system
:post-loadable t)
Please sign in to comment.
Something went wrong with that request. Please try again.