commit 8c0cd81337706d080adcc5de4517cb83909d77e9
parent 1cc6ff191bd96ed79a61d5f7a6aecb31dfe02e22
Author: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 21 Feb 2008 14:49:58 +0000
doc repairs and r6rs repairs
svn: r8754
original commit: f39b12a55585ff049dd7761f1b70dca0552c3086
Diffstat:
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/collects/scribble/run.ss b/collects/scribble/run.ss
@@ -92,6 +92,6 @@
(when (current-info-output-file)
(let ([s (send renderer serialize-info r-info)])
(with-output-to-file (current-info-output-file)
- #:exists 'truncate/replace
(lambda ()
- (write s))))))))))))
+ (write s))
+ 'truncate/replace))))))))))
diff --git a/collects/scribble/struct.ss b/collects/scribble/struct.ss
@@ -191,7 +191,7 @@
(with-handlers ([exn:fail:contract?
(lambda (exn)
(error 'serialize-delayed-element
- "serialization failed (wrong resolve info?); ~a"
+ "serialization failed (wrong resolve info? delayed element never rendered?); ~a"
(exn-message exn)))])
(vector
(make-element #f (delayed-element-content d ri))))))
@@ -234,7 +234,7 @@
(with-handlers ([exn:fail:contract?
(lambda (exn)
(error 'serialize-part-relative-element
- "serialization failed (wrong resolve info?); ~a"
+ "serialization failed (wrong resolve info? part-relative element never rendered?); ~a"
(exn-message exn)))])
(vector
(make-element #f (part-relative-element-content d ri))))))