make raco exe -l
cooperate with tethered-executable builds
The configuration of an addon-tethered directory is treated as a sign that access to collections in the "user" space should be accessible by default in a launcher, as well as propagating the addon-directory setting to the launched program.
This commit is contained in:
parent
a1ba579666
commit
f2b76a675a
|
@ -3,7 +3,8 @@
|
|||
raco/command-name
|
||||
compiler/private/embed
|
||||
launcher/launcher
|
||||
dynext/file)
|
||||
dynext/file
|
||||
setup/dirs)
|
||||
|
||||
(define verbose (make-parameter #f))
|
||||
(define very-verbose (make-parameter #f))
|
||||
|
@ -29,6 +30,16 @@
|
|||
[("--gui") "Generate GUI executable"
|
||||
(gui #t)]
|
||||
[("-l" "--launcher") "Generate a launcher"
|
||||
(when (or (find-addon-tethered-gui-bin-dir)
|
||||
(find-addon-tethered-console-bin-dir))
|
||||
;; When an addon-executable directory is configured, treat the
|
||||
;; addon directory more like an installation directory, instead
|
||||
;; of a user-specific directory: record it, and remove the -U
|
||||
;; flag (if any)
|
||||
(exe-embedded-flags
|
||||
(append
|
||||
(list "-A" (path->string (find-system-path 'addon-dir)))
|
||||
(remove "-U" (exe-embedded-flags)))))
|
||||
(launcher #t)]
|
||||
[("--config-path") path "Set <path> as configuration directory for executable"
|
||||
(exe-embedded-config-path path)]
|
||||
|
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
(define collection 'multi)
|
||||
|
||||
(define deps '(["base" #:version "6.2.900.10"]
|
||||
(define deps '(["base" #:version "6.5.0.2"]
|
||||
"scheme-lib"
|
||||
"rackunit-lib"
|
||||
"zo-lib"))
|
||||
|
|
Loading…
Reference in New Issue
Block a user