[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser-gauche 88a3376d10 1/3: avoid nested geiser-eval cal
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/geiser-gauche 88a3376d10 1/3: avoid nested geiser-eval call |
Date: |
Tue, 3 May 2022 13:58:56 -0400 (EDT) |
branch: elpa/geiser-gauche
commit 88a3376d1054745779574f257ebe87fe9fe9b720
Author: Fabian Brosda <f.brosda@gmx.de>
Commit: Fabian Brosda <f.brosda@gmx.de>
avoid nested geiser-eval call
Due to the change to asynchronous evaluation it is not possible, the
get the current module by through evaluating scheme code. Instead, if
the module is not defined, just return `:f`
emacs-geiser/gauche#2
---
geiser-gauche.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/geiser-gauche.el b/geiser-gauche.el
index ac4bc1981a..2c425d1d5b 100644
--- a/geiser-gauche.el
+++ b/geiser-gauche.el
@@ -262,9 +262,7 @@ form."
(looking-at geiser-gauche--module-re)
(re-search-forward geiser-gauche--module-re nil t))
(geiser-gauche--get-module (match-string-no-properties 1))
- ;; Return the REPL module as fallback
- (geiser-gauche--get-module
- (geiser-gauche--get-current-repl-module)))))
+ :f)))
((symbolp module) module)
((listp module) module)
((stringp module)