[Emacs-diffs] master 8e010cf: * lisp/emacs-lisp/cl-generic.el (cl--generic-member-method): Fix paren typo.

[Stefan Monnier]

branch: master
commit 8e010cf6e7486fae28ec6de80f098c793aee28f3
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * lisp/emacs-lisp/cl-generic.el (cl--generic-member-method): Fix paren typo.
---
 lisp/ChangeLog                |    2 ++
 lisp/emacs-lisp/cl-generic.el |    4 ++--
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a76d83a..9e473e2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2015-02-04  Stefan Monnier  <address@hidden>
 
+       * emacs-lisp/cl-generic.el (cl--generic-member-method): Fix paren typo.
+
        * textmodes/flyspell.el: Use lexical-binding and cl-lib.
        (mail-mode-flyspell-verify): Fix last change.
        (flyspell-external-point-words, flyspell-large-region):
diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el
index 72ec8ec..42e6379 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)