branch: elpa/geiser-gauche
commit 429ad4579d3944a9ee93882c342270459fe88a40
Author: András Simonyi <[email protected]>
Commit: András Simonyi <[email protected]>
Add special handling for compile-file in the elisp eval proc
---
geiser-gauche.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/geiser-gauche.el b/geiser-gauche.el
index 3a4e84d..77529de 100644
--- a/geiser-gauche.el
+++ b/geiser-gauche.el
@@ -88,7 +88,8 @@
(cl-case proc
;; Eval and compile are (module) context sensitive
((no-values) "(eval '(geiser:no-values) (find-module 'geiser))")
- ((load-file) (format "(eval '(geiser:load-file %s) (find-module 'geiser))"
(car args)))
+ ((load-file compile-file)
+ (format "(eval '(geiser:load-file %s) (find-module 'geiser))" (car args)))
((eval compile)
(let ((module (cond ((string-equal "'()" (car args))
"'()")
