forgot leftover

svn: r16241
2009-10-05 04:37:47 +00:00 · 2009-10-05 04:37:47 +00:00 · 7eb822f03a
commit 7eb822f03a
parent e499c32435
1 changed files with 1 additions and 1 deletions
--- a/collects/setup/winvers-change.ss
+++ b/collects/setup/winvers-change.ss
@ -49,7 +49,7 @@
          [(regexp-match-positions xxxs dfile)
           (fprintf (current-error-port)
                    "Warning: ~a was not renamed!\n" (full-path))]))
-  (let-values ([(i o) (open-input-output-file file 'update)])
+  (let-values ([(i o) (open-input-output-file file #:exists 'update)])
    (define print? verbose?)
    (for ([subst (in-list substitutions)])
      (file-position i 0)