bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit a0b4797b47ad100371703c87c6f98aa1c28a62cb
parent f1878977822e02ebef51dab6e2e22e2deff5a257
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Sun, 12 Jul 2009 13:37:01 +0000

fix --xref-out flag

svn: r15437

original commit: 48226b88bebe48a2fbd38d47d14eca2cf5a122e9

Diffstat:
M
collects/scribble/run.ss
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/collects/scribble/run.ss b/collects/scribble/run.ss
@@ -125,7 +125,7 @@
         (when (current-info-output-file)
           (let ([s (send renderer serialize-info r-info)])
             (with-output-to-file (current-info-output-file)
-              (lambda () (write s))
-              'truncate/replace)))))))
+              #:exists 'truncate/replace
+              (lambda () (write s)))))))))
 
 (run)