summaryrefslogtreecommitdiff
path: root/elisp/geiser-completion.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-10-30 04:57:31 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-10-30 04:57:31 +0200
commit89e1f6444208bc70deeeca765f212296ed11c634 (patch)
tree157946b1656e169664300497becf504f05a1c1b6 /elisp/geiser-completion.el
parentd89131b0ff58fb6d8d12fa0404f2b0d26e964d72 (diff)
downloadgeiser-chez-89e1f6444208bc70deeeca765f212296ed11c634.tar.gz
geiser-chez-89e1f6444208bc70deeeca765f212296ed11c634.tar.bz2
Elisp: more flexible parsing of :eval and :ge forms
This allows the implementation decide the concrete structure of the code sent to the REPL. For instance, it doesn't need to be a single s-expression, and argument order can be re-arranged.
Diffstat (limited to 'elisp/geiser-completion.el')
-rw-r--r--elisp/geiser-completion.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el
index 63a1e07..5c2f604 100644
--- a/elisp/geiser-completion.el
+++ b/elisp/geiser-completion.el
@@ -153,10 +153,10 @@ terminates a current completion."
(defun geiser-completion--symbol-list (prefix)
(geiser--del-dups
(append (all-completions prefix (geiser-completion--locals))
- (geiser-eval--send/result `(:eval ((:ge completions) ,prefix))))))
+ (geiser-eval--send/result `(:eval (:ge completions ,prefix))))))
(defsubst geiser-completion--module-list (prefix)
- (geiser-eval--send/result `(:eval ((:ge module-completions) ,prefix))))
+ (geiser-eval--send/result `(:eval (:ge module-completions ,prefix))))
(defvar geiser-completion--symbol-list-func
(completion-table-dynamic 'geiser-completion--symbol-list))