From d2bf5a921d1a9fcac93b54df13f69de8ebb9bab2 Mon Sep 17 00:00:00 2001 From: camm <camm@localhost> Date: Sat, 24 Jul 2004 13:14:29 +0000 Subject: [PATCH] Michael Koehne's ansi patches, Thanks! --- ansi-tests/printer-aux.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ansi-tests/printer-aux.lsp b/ansi-tests/printer-aux.lsp index 821c0a24..42bc37f0 100644 --- a/ansi-tests/printer-aux.lsp +++ b/ansi-tests/printer-aux.lsp @@ -112,7 +112,7 @@ (with-standard-io-syntax (format *debug-io* "~%~A~%" params))) (finish-output *debug-io*)) - (setf (readtable-case *readtable*) readcase) +; (setf (readtable-case *readtable*) readcase) (let* ((str (handler-case (with-output-to-string (s) (write obj :stream s)) (print-not-readable -- GitLab