[Emacs-diffs] master a7417dd 4/6: Suppress warning about object-print in eieio.el

[Lars Ingebrigtsen]

branch: master
commit a7417ddf5e082543b23feaa86ba7be0b990851df
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Suppress warning about object-print in eieio.el
    
    * lisp/emacs-lisp/eieio.el (obsolete): Suppress warning about
    object-print being obsolete, because there are no in-tree
    definitions any more.
---
 lisp/emacs-lisp/eieio.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el
index 4f73c60..504133c 100644
--- a/lisp/emacs-lisp/eieio.el
+++ b/lisp/emacs-lisp/eieio.el
@@ -851,12 +851,12 @@ to prepend a space."
   (eieio-object-name this (apply #'concat strings)))
 
 
-(cl-defmethod cl-print-object ((object eieio-default-superclass) stream)
-  "Default printer for EIEIO objects."
-  ;; 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))
+(with-suppressed-warnings ((obsolete object-print))
+  (cl-defmethod cl-print-object ((object eieio-default-superclass) stream)
+    "Default printer for EIEIO objects."
+    ;; 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.
     (princ (object-print object) stream)))
 
 (defvar eieio-print-depth 0