Trying to use xrepl no longer swallos all errors.

2016-07-19 16:32:36 -04:00 · 2016-07-19 16:32:36 -04:00 · 6c0dfa7053
commit 6c0dfa7053
parent b1adf65fd0
1 changed files with 2 additions and 1 deletions
--- a/racket/collects/racket/init.rkt
+++ b/racket/collects/racket/init.rkt
@ -14,5 +14,6 @@
                       racket/help))

 ;; Set the default replt to XREPL
-(with-handlers ([exn:fail? void])
+(when (collection-file-path "main.rkt" "xrepl"
+                            #:fail (lambda _ #f))
  (dynamic-require 'xrepl #f))