summaryrefslogtreecommitdiff
path: root/elisp/geiser-guile.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-13 03:50:23 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-13 03:50:23 +0200
commitb14ac49fd2c306bf24911313ca362fef94a9b8d1 (patch)
treecb59a0e84d6f50aa91c1012149fdb85baf0ce7d0 /elisp/geiser-guile.el
parentbb5b1cb5e97e3e0cc7fd49411826df09c3f74f4b (diff)
downloadgeiser-guile-b14ac49fd2c306bf24911313ca362fef94a9b8d1.tar.gz
geiser-guile-b14ac49fd2c306bf24911313ca362fef94a9b8d1.tar.bz2
Guile: rewriting stack trace captures - not yet complete.
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 c6c165b..44a4e9f 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -110,7 +110,8 @@ This function uses `geiser-guile-init-file' if it exists."
(geiser-guile-get-module (match-string-no-properties 1))
:f)))
((listp module) module)
- ((stringp module) (or (ignore-errors (car (read-from-string module))) :f))
+ ((stringp module)
+ (or (ignore-errors (car (read-from-string module))) :f))
(t :f)))
(defun geiser-guile-symbol-begin (module)