summaryrefslogtreecommitdiff
path: root/scheme/guile/geiser/eval.scm
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-11 01:41:53 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-11 01:41:53 +0100
commit2b2355b6134f5068dfff424f8fda32ae0236a516 (patch)
tree766c9150a67f1b035367d7e800b57f01f8736e8b /scheme/guile/geiser/eval.scm
parent6edd43a2b5250cee8f46bacf7c0d799422fae213 (diff)
downloadgeiser-chez-2b2355b6134f5068dfff424f8fda32ae0236a516.tar.gz
geiser-chez-2b2355b6134f5068dfff424f8fda32ae0236a516.tar.bz2
* scheme/guile/geiser/eval.scm: missing file in previous commit
Diffstat (limited to 'scheme/guile/geiser/eval.scm')
-rw-r--r--scheme/guile/geiser/eval.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/scheme/guile/geiser/eval.scm b/scheme/guile/geiser/eval.scm
index b4c0ea0..530099d 100644
--- a/scheme/guile/geiser/eval.scm
+++ b/scheme/guile/geiser/eval.scm
@@ -70,7 +70,9 @@ SUBR, MSG and REST."
(current (getcwd)))
(dynamic-wind
(lambda () (chdir dest))
- (lambda () (compile-file path))
+ (lambda ()
+ (compile-file path)
+ (compile-and-load path))
(lambda () (chdir current)))))
;;; eval.scm ends here