Fixed a typo in stream-read-line; the value of the :element-type was not

quoted.
McCLIM · Apr 21, 2002 · a98e02f · a98e02f
1 parent cd91ff5
commit a98e02f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/stream-input.lisp b/stream-input.lisp
@@ -326,7 +326,7 @@
 (defmethod stream-read-line ((stream standard-extended-input-stream))
   (with-encapsulating-stream (estream stream)
     (let ((result (make-array 1
-			      :element-type character
+			      :element-type 'character
 			      :adjustable t
 			      :fill-pointer 0)))
       (loop for char = (stream-read-char estream)