summaryrefslogtreecommitdiff
path: root/elisp/geiser-guile.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-04-01 03:33:59 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-04-01 03:33:59 +0200
commit9e3824769052e15996dd7583f61b9389dc6f88b8 (patch)
tree0832452a6939f57933f4b5dd6af56f1c8d3a6e6d /elisp/geiser-guile.el
parent1c9457aa15b00a9a9f058a5677370305aa68da79 (diff)
downloadgeiser-guile-9e3824769052e15996dd7583f61b9389dc6f88b8.tar.gz
geiser-guile-9e3824769052e15996dd7583f61b9389dc6f88b8.tar.bz2
Using the scheme reader to read modules names.
Diffstat (limited to 'elisp/geiser-guile.el')
-rw-r--r--elisp/geiser-guile.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index db4b27d..0bbf9b7 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -86,7 +86,8 @@ This function uses `geiser-guile-init-file' if it exists."
:f)))
((listp module) module)
((stringp module)
- (or (ignore-errors (car (read-from-string module))) :f))
+ (or (ignore-errors
+ (car (geiser-syntax--read-from-string module))) :f))
(t :f)))
(defun geiser-guile--enter-command (module)