diff options
| author | Peter Wang <ptr.wang@gmail.com> | 2016-11-26 17:06:38 +0800 |
|---|---|---|
| committer | Peter Wang <ptr.wang@gmail.com> | 2016-11-26 17:06:38 +0800 |
| commit | f136cfbdd23a3e27463528e4eeb0e6fd0df770ef (patch) | |
| tree | 4f0e29495d9f0f6da2dc5232ddc38336384e0aef /elisp/geiser-impl.el | |
| parent | aa68e69fae37be8b52cb43258bbd41ef49ff0905 (diff) | |
| download | geiser-f136cfbdd23a3e27463528e4eeb0e6fd0df770ef.tar.gz geiser-f136cfbdd23a3e27463528e4eeb0e6fd0df770ef.tar.bz2 | |
fix malformed argument lists.
Emacs trunk does not support arguments list like (lambda (&rest) nil)
anymore, which breaks geiser and errors with "Invalid function: "
Diffstat (limited to 'elisp/geiser-impl.el')
| -rw-r--r-- | elisp/geiser-impl.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/elisp/geiser-impl.el b/elisp/geiser-impl.el index cbc0b12..4f4f0ee 100644 --- a/elisp/geiser-impl.el +++ b/elisp/geiser-impl.el @@ -158,7 +158,7 @@ determine its scheme flavour." (= 2 (length m)) (symbolp (car m))) (if (functionp (cadr m)) m - `(,(car m) (lambda (&rest) ,(cadr m)))))) + `(,(car m) (lambda (&rest args) ,(cadr m)))))) (defun geiser-impl--define (file name parent methods) (let* ((methods (mapcar 'geiser-impl--normalize-method methods)) |