diff options
| -rw-r--r-- | scheme/racket/geiser/modules.rkt | 4 | 
1 files changed, 3 insertions, 1 deletions
| diff --git a/scheme/racket/geiser/modules.rkt b/scheme/racket/geiser/modules.rkt index af19b03..9b640ec 100644 --- a/scheme/racket/geiser/modules.rkt +++ b/scheme/racket/geiser/modules.rkt @@ -138,7 +138,9 @@    module-cache)  (define (module-exports mod) -  (define (value id) (dynamic-require mod id (const #f))) +  (define (value id) +    (with-handlers ([exn? (const #f)]) +      (dynamic-require mod id (const #f))))    (define (contracted id)      (let ([v (value id)])        (if (has-contract? v) | 
