1.0.13.48: SET-CLOSED-FLAME set ANSI-STREAM-IN twice (harmless but silly)

 * Thanks to David Smith.

diff --git a/src/code/stream.lisp b/src/code/stream.lisp
index fd49263..272bde6 100644 (file)
--- a/src/code/stream.lisp
+++ b/src/code/stream.lisp
@@ -128,7 +128,6 @@
   (setf (ansi-stream-in stream) #'closed-flame)
   (setf (ansi-stream-bin stream) #'closed-flame)
   (setf (ansi-stream-n-bin stream) #'closed-flame)
-  (setf (ansi-stream-in stream) #'closed-flame)
   (setf (ansi-stream-out stream) #'closed-flame)
   (setf (ansi-stream-bout stream) #'closed-flame)
   (setf (ansi-stream-sout stream) #'closed-flame)

diff --git a/version.lisp-expr b/version.lisp-expr
index 5d6dd30..430c274 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.13.47"
+"1.0.13.48"