diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-02-04 14:45:07 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-02-04 14:45:07 -0500 |
| commit | 8e010cf6e7486fae28ec6de80f098c793aee28f3 (patch) | |
| tree | 7bfe1c6ca8d745a49fb100c18dc76f8f3265225b /lisp/emacs-lisp | |
| parent | df179332d4e75b22cd5f990822667c8d280c8167 (diff) | |
| download | emacs-8e010cf6e7486fae28ec6de80f098c793aee28f3.tar.gz emacs-8e010cf6e7486fae28ec6de80f098c793aee28f3.tar.bz2 emacs-8e010cf6e7486fae28ec6de80f098c793aee28f3.zip | |
* lisp/emacs-lisp/cl-generic.el (cl--generic-member-method): Fix paren typo.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-generic.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el index 72ec8ec1801..42e637958b1 100644 --- a/lisp/emacs-lisp/cl-generic.el +++ b/lisp/emacs-lisp/cl-generic.el @@ -355,8 +355,8 @@ which case this method will be invoked when the argument is `eql' to VAL. (let ((m (car methods))) (not (and (equal (cl--generic-method-specializers m) specializers) (equal (cl--generic-method-qualifiers m) qualifiers))))) - (setq methods (cdr methods)) - methods)) + (setq methods (cdr methods))) + methods) ;;;###autoload (defun cl-generic-define-method (name qualifiers args uses-cnm function) |