summaryrefslogtreecommitdiff
path: root/elisp/geiser-completion.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-29 01:42:37 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-29 01:42:37 +0100
commite4f87fdc18d4aef2c4e7c3602ac3975f2140fae1 (patch)
tree026a08cbafd054a63a006f5b0cbd7153973c8a71 /elisp/geiser-completion.el
parentd70e9de59cfeae4fa8e76a48dbfe80e9d25e0d7c (diff)
downloadgeiser-chez-e4f87fdc18d4aef2c4e7c3602ac3975f2140fae1.tar.gz
geiser-chez-e4f87fdc18d4aef2c4e7c3602ac3975f2140fae1.tar.bz2
Fixes for locals scanning
... using the new non-interning reader. Plus scanning for case-lambda and syntax-rules. `geiser-syntax--scan-locals' is in danger of refactoring, specially if we add support for let-values.
Diffstat (limited to 'elisp/geiser-completion.el')
-rw-r--r--elisp/geiser-completion.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el
index 0deb76c..c63813d 100644
--- a/elisp/geiser-completion.el
+++ b/elisp/geiser-completion.el
@@ -49,10 +49,8 @@
"A list of forms introducing nested local bindings, a la let*.")
(defsubst geiser-completion--locals ()
- (mapcar (lambda (s) (and (symbolp s) (symbol-name s)))
- (geiser-syntax--locals-around-point
- geiser-completion--binding-forms
- geiser-completion--binding-forms*)))
+ (geiser-syntax--locals-around-point geiser-completion--binding-forms
+ geiser-completion--binding-forms*))
(defun geiser-completion--symbol-list (prefix)
(geiser--del-dups