diff options
| -rw-r--r-- | geiser/evaluation.scm | 2 | 
1 files changed, 2 insertions, 0 deletions
| diff --git a/geiser/evaluation.scm b/geiser/evaluation.scm index 1f3afc0..37f4171 100644 --- a/geiser/evaluation.scm +++ b/geiser/evaluation.scm @@ -95,6 +95,8 @@    (let ((module (or (and (list? module-name)                           (resolve-module module-name))                      (current-module))) +        (evaluator (lambda (f m) +                     (call-with-values (lambda () (evaluator f m)) list)))          (result #f)          (captured-stack #f)          (error #f)) | 
