summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2015-02-04 14:45:07 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2015-02-04 14:45:07 -0500
commit8e010cf6e7486fae28ec6de80f098c793aee28f3 (patch)
tree7bfe1c6ca8d745a49fb100c18dc76f8f3265225b
parentdf179332d4e75b22cd5f990822667c8d280c8167 (diff)
downloademacs-8e010cf6e7486fae28ec6de80f098c793aee28f3.tar.gz
* lisp/emacs-lisp/cl-generic.el (cl--generic-member-method): Fix paren typo.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/emacs-lisp/cl-generic.el4
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 <monnier@iro.umontreal.ca>
+ * 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)