From 8e010cf6e7486fae28ec6de80f098c793aee28f3 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 4 Feb 2015 14:45:07 -0500 Subject: [PATCH] * 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 a76d83a69dd..9e473e21626 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2015-02-04 Stefan Monnier + * 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 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) -- 2.39.5