racket/collects/tests/planet2/tests-raco.rkt
Jay McCarthy fae660b0e4 Release Planet 2 (beta)
This was developed in a different repository, so the history will be
archived there:

https://github.com/jeapostrophe/galaxy
2012-11-08 06:16:42 -07:00

31 lines
917 B
Racket

#lang racket/base
(require "shelly.rkt"
"util.rkt")
(pkg-tests
(with-fake-root
(shelly-case
"raco install/update uses raco setup, unless you turn it off (cmdline)"
$ "raco pkg create test-pkgs/raco-pkg"
$ "raco raco-pkg" =exit> 1
$ "raco pkg install --dont-setup test-pkgs/raco-pkg.plt"
$ "raco raco-pkg" =exit> 1))
(with-fake-root
(shelly-case
"raco install/update uses raco setup, unless you turn it off (env)"
(putenv "PLT_PLANET2_DONTSETUP" "1")
$ "raco pkg create test-pkgs/raco-pkg"
$ "raco raco-pkg" =exit> 1
$ "raco pkg install --dont-setup test-pkgs/raco-pkg.plt"
$ "raco raco-pkg" =exit> 1
(putenv "PLT_PLANET2_DONTSETUP" "")))
(with-fake-root
(shelly-case
"raco install/update uses raco setup"
$ "raco pkg create test-pkgs/raco-pkg"
$ "raco raco-pkg" =exit> 1
$ "raco pkg install test-pkgs/raco-pkg.plt"
$ "raco raco-pkg" =exit> 0)))