diff --git a/collects/setup/setup-unit.rkt b/collects/setup/setup-unit.rkt index 0d0c9effcb..562315a6e1 100644 --- a/collects/setup/setup-unit.rkt +++ b/collects/setup/setup-unit.rkt @@ -441,7 +441,8 @@ (define (check-against-all given-ccs) (when (null? given-ccs) - (raise-user-error name-sym "nothing to do")) + (setup-printf #f "nothing to do") + (exit 1)) (define (cc->name cc) (string-join (map path->string (cc-collection cc)) "/")) (define (cc->cc+name+id cc)