fix winvers script

svn: r8229
This commit is contained in:
Matthew Flatt 2008-01-05 23:06:05 +00:00
parent 1713c3c1bc
commit c0a09ccef6
2 changed files with 3 additions and 3 deletions

View File

@ -36,7 +36,7 @@
(subprocess
(current-output-port) (current-input-port) (current-error-port)
exe "--collects" collects-dir
"-mvqL-" "winvers.ss" "setup" "patch"))]
"-l" "setup/winvers" "patch"))]
[(equal? argv #("patch"))
(sleep 1) ; time for other process to end
(patch-files)
@ -44,7 +44,7 @@
(subprocess
(current-output-port) (current-input-port) (current-error-port)
(build-path (find-console-bin-dir) "mzscheme.exe")
"-mvqL-" "winvers.ss" "setup" "finish")]
"-l" "setup/winvers" "finish")]
[(equal? argv #("finish"))
(sleep 1) ; time for other process to end
(delete-directory/files

View File

@ -164,7 +164,7 @@ be replaced with a specific version.
To replace the "xxxxxxx" with a specific version, run
mzscheme -l setup/winvers.ss
mzscheme -l setup/winvers
in a shell.