diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-10-30 04:57:31 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-10-30 04:57:31 +0200 |
| commit | 92ebee294b4d66abbbb3250ce910239427c48ebb (patch) | |
| tree | fecbd5833c0af3664f9dd6d7b7dccec683d84799 /elisp/geiser-xref.el | |
| parent | fcc581bea01856c8c644bf3e312c2369949b353f (diff) | |
| download | geiser-92ebee294b4d66abbbb3250ce910239427c48ebb.tar.gz geiser-92ebee294b4d66abbbb3250ce910239427c48ebb.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-xref.el')
| -rw-r--r-- | elisp/geiser-xref.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/elisp/geiser-xref.el b/elisp/geiser-xref.el index 29bc008..a93b7a8 100644 --- a/elisp/geiser-xref.el +++ b/elisp/geiser-xref.el @@ -111,7 +111,7 @@ (defun geiser-xref--fetch-xrefs (ask kind rkind proc) (let* ((name (geiser-xref--read-name ask (format "%s: " (capitalize kind)))) (res (and name (geiser-eval--send/result - `(:eval ((:ge ,proc) (quote (:scm ,name)))))))) + `(:eval (:ge ,proc (quote (:scm ,name)))))))) (message "Retrieving %ss list for '%s'..." rkind name) (if (or (not res) (not (listp res))) (message "No %ss found for '%s'" rkind name) |