Commit 5f670604 authored by Pascal J. Bourguignon's avatar Pascal J. Bourguignon

Corrected use of namestring on stream.

parent 4934dafd
......@@ -2025,7 +2025,6 @@ VERBOSE: When true, writes some information in the *TRACE-OUTPUT*.
RETURN: A list of html elements.
SEE ALSO: HTML-TAG, HTML-ATTRIBUTES, HTML-ATTRIBUTE, HTML-CONTENTS.
"
(print (list stream (type-of stream))) (terpri) (finish-output)
(let ((name (or (ignore-errors (namestring stream))
(princ-to-string stream)))
synthetic walked encased)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment