mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

Suppress warning about object-print in eieio.el

Browse Source 
* lisp/emacs-lisp/eieio.el (cl-print-object): Suppress the warning
about object-print being obsolete, since there are no in-tree
methods like that any more.
This commit is contained in:
Lars Ingebrigtsen 2019-06-17 11:42:03 +02:00
parent 5a35377fed
commit 3820b77c9e
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/emacs-lisp/eieio.el
View File

@ -853,8 +853,11 @@ to prepend a space."
(cl-defmethod cl-print-object ((object eieio-default-superclass) stream)
"Default printer for EIEIO objects."
;; Fallback to the old `object-print'.
(princ (object-print object) stream))
;; Fallback to the old `object-print'. There should be no
;; `object-print' methods in the Emacs tree, but there may be some
;; out-of-tree.
(with-suppressed-warnings ((obsolete object-print))
(princ (object-print object) stream)))
(defvar eieio-print-depth 0
"The current indentation depth while printing.