anoter repair to test for raco pkg

This commit is contained in:
Matthew Flatt 2020-09-03 08:50:46 -06:00
parent 9464bc3274
commit f50f44bb25
2 changed files with 3 additions and 4 deletions

View File

@ -1,5 +1,6 @@
#lang racket/base
(require "shelly.rkt"
(require racket/file
"shelly.rkt"
"util.rkt")
(this-test-is-run-by-the-main-test)
@ -34,5 +35,5 @@
(rename-file-or-directory alt-dir pkg-dir))
;; create the directory and try again:
(begin
(make-directory pkg-dir)
(make-directory* pkg-dir)
(try-now))))

View File

@ -49,7 +49,6 @@
(define tmp-dir
(make-temporary-file ".racket.fake-installation~a" 'directory
(find-system-path 'temp-dir)))
(make-directory* tmp-dir)
(dynamic-wind
void
(λ ()
@ -105,7 +104,6 @@
(define tmp-dir
(make-temporary-file ".racket.fake-root~a" 'directory
(find-system-path 'home-dir)))
(make-directory* tmp-dir)
(dynamic-wind
void
(λ ()