diff --git a/racket/collects/racket/file.rkt b/racket/collects/racket/file.rkt index c27181d4e9..984c7c528f 100644 --- a/racket/collects/racket/file.rkt +++ b/racket/collects/racket/file.rkt @@ -419,9 +419,9 @@ ;; in the configuration directory: (values (let* ([d (find-config-dir)] - [f (and d (build-path d "racket-prefs.rktd"))]) - (if (file-exists? f) - f + [c-f (and d (build-path d "racket-prefs.rktd"))]) + (if (and c-f (file-exists? c-f)) + c-f ;; Trigger a filesystem error: (call-with-input-file* f void))) #f))))))])