diff --git a/collects/compiler/commands/test.rkt b/collects/compiler/commands/test.rkt index c42a5eabb4..381498b9ff 100644 --- a/collects/compiler/commands/test.rkt +++ b/collects/compiler/commands/test.rkt @@ -108,13 +108,10 @@ [l (for-each do-test l)])] [packages? - (unless (for*/or ([scope (in-list '(installation user shared))]) - (define pd - (parameterize ([current-pkg-scope scope]) - (with-handlers ([exn:fail? (λ (x) #f)]) - (pkg-directory e)))) - (and pd (do-test pd))) - (error 'test "Package ~e is not installed" e))] + (define pd (pkg-directory e)) + (if pd + (do-test pd) + (error 'test "Package ~e is not installed" e))] [else (do-test e)]))