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

make raco pkg install' call raco setup' via `setup/setup'

Browse Source 
Instead of using `system'.
This commit is contained in:
Matthew Flatt 2012-11-28 09:53:20 -07:00
parent 88a729df56
commit abe4c1143f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/planet2/main.rkt
View File

@ -1,13 +1,13 @@
#lang racket/base #lang racket/base
(require racket/function (require racket/function
racket/system
"lib.rkt" "lib.rkt"
"commands.rkt") "commands.rkt"
(prefix-in setup: setup/setup))
(define (setup dont-setup) (define (setup dont-setup)
(unless (or dont-setup (unless (or dont-setup
(equal? "1" (getenv "PLT_PLANET2_DONTSETUP"))) (equal? "1" (getenv "PLT_PLANET2_DONTSETUP")))
(system "raco setup"))) (setup:setup)))
(commands (commands
"This tool is used for managing installed packages." "This tool is used for managing installed packages."