fix mzschemecgc name (to not overwrite mzscheme)

This commit is contained in:
Matthew Flatt 2010-04-15 21:40:28 -04:00
parent cea92a1737
commit ccee3d4d9e

View File

@ -6,6 +6,7 @@
(define (post-installer path) (define (post-installer path)
(define variants (available-mzscheme-variants)) (define variants (available-mzscheme-variants))
(for ([v (in-list variants)]) (for ([v (in-list variants)])
(parameterize ([current-launcher-variant v])
(create-embedding-executable (create-embedding-executable
(mzscheme-program-launcher-path "MzScheme") (mzscheme-program-launcher-path "MzScheme")
#:variant v #:variant v
@ -13,4 +14,4 @@
#:launcher? #t #:launcher? #t
#:aux '((framework-root . #f) #:aux '((framework-root . #f)
(dll-dir . #f) (dll-dir . #f)
(relative? . #t))))) (relative? . #t))))))