suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

forgot leftover

Browse Source 
svn: r16241
This commit is contained in:
Eli Barzilay 2009-10-05 04:37:47 +00:00
parent e499c32435
commit 7eb822f03a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/setup/winvers-change.ss
View File

@ -49,7 +49,7 @@
[(regexp-match-positions xxxs dfile) [(regexp-match-positions xxxs dfile)
(fprintf (current-error-port) (fprintf (current-error-port)
"Warning: ~a was not renamed!\n" (full-path))])) "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?) (define print? verbose?)
(for ([subst (in-list substitutions)]) (for ([subst (in-list substitutions)])
(file-position i 0) (file-position i 0)