From 9e3824769052e15996dd7583f61b9389dc6f88b8 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Thu, 1 Apr 2010 03:33:59 +0200
Subject: Using the scheme reader to read modules names.

---
 elisp/geiser-guile.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'elisp')

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)
-- 
cgit v1.2.3