1.0.15.1: Fix asdf-install for HTTP servers that omit the Length: header.

Make copy-stream use the output stream's element type, as the input stream
is very likely to be a bivalent stream, which will report CHARACTER, leading
to incompatible element-types.

diff --git a/contrib/asdf-install/installer.lisp b/contrib/asdf-install/installer.lisp
index b43f15a..b55532a 100644 (file)
--- a/contrib/asdf-install/installer.lisp
+++ b/contrib/asdf-install/installer.lisp
@@ -138,7 +138,7 @@
 
 
 (defun copy-stream (in out)
-  (let ((buf (make-array 8192 :element-type (stream-element-type in))))
+  (let ((buf (make-array 8192 :element-type (stream-element-type out))))
     (loop for pos = (read-sequence buf in)
           until (zerop pos)
           do (write-sequence buf out :end pos))))

diff --git a/version.lisp-expr b/version.lisp-expr
index 3f7a36a..35162a0 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.15"
+"1.0.15.1"