fix Scribble output of multi-line error messages, especially when they contain a blank line; minor doc repairs

svn: r13325 original commit: 6c77acf6f1e114040d68454858f2a998ef83e0cd
2009-01-30 16:41:42 +00:00 · 2009-01-30 16:41:42 +00:00 · 6654439df1
commit 6654439df1
parent 74e933d24e
1 changed files with 1 additions and 5 deletions
--- a/collects/scribble/eval.ss
+++ b/collects/scribble/eval.ss
@ -93,11 +93,7 @@
                 ;; Error result case:
                 (map
                  (lambda (s)
-                    (list (make-flow (list (make-paragraph
-                                            (list
-                                             (hspace 2)
-                                             (span-class "schemeerror"
-                                                         (italic s))))))))
+                    (car (format-output s "schemeerror")))
                  (let sloop ([s (caar val-list+outputs)])
                     (if ((string-length s) . > . maxlen)
                         ;; break the error message into multiple lines: