[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 88694fb: * lisp/emacs-lisp/cl-generic.el (cl-generi
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master 88694fb: * lisp/emacs-lisp/cl-generic.el (cl-generic-generalizers): Remove warning |
Date: |
Wed, 09 Sep 2015 17:18:15 +0000 |
branch: master
commit 88694fb65887ebc2fde9dea18c817e08be26b564
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* lisp/emacs-lisp/cl-generic.el (cl-generic-generalizers): Remove warning
---
lisp/emacs-lisp/cl-generic.el | 7 +++++--
1 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el
index c012a30..dd01ebe 100644
--- a/lisp/emacs-lisp/cl-generic.el
+++ b/lisp/emacs-lisp/cl-generic.el
@@ -1069,8 +1069,11 @@ The value returned is a list of elements of the form
(or
(and (assq type cl--generic-typeof-types)
(progn
- (if (memq type '(vector array sequence))
- (message "`%S' also matches CL structs and EIEIO classes" type))
+ ;; FIXME: While this wrinkle in the semantics can be occasionally
+ ;; problematic, this warning is more often annoying than helpful.
+ ;;(if (memq type '(vector array sequence))
+ ;; (message "`%S' also matches CL structs and EIEIO classes"
+ ;; type))
(list cl--generic-typeof-generalizer)))
(cl-call-next-method)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 88694fb: * lisp/emacs-lisp/cl-generic.el (cl-generic-generalizers): Remove warning,
Stefan Monnier <=