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
commitd4676101dbce785b8b4783dcbdf20bd73a0e9a20 (patch)
tree02e74dce3b47507411df5bd69143f3640b9d58e7 /elisp/geiser-completion.el
parent7cc98abc1d8ad68e350a176fb0d1ddbe7796fad1 (diff)
downloadgeiser-d4676101dbce785b8b4783dcbdf20bd73a0e9a20.tar.gz
geiser-d4676101dbce785b8b4783dcbdf20bd73a0e9a20.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