1 files changed, 1 insertions, 2 deletions

diff --git a/lisp/emacs-lisp/eieio-base.el b/lisp/emacs-lisp/eieio-base.el
index 7975cdf280d..e032a9effdf 100644
--- a/lisp/emacs-lisp/eieio-base.el
+++ b/lisp/emacs-lisp/eieio-base.el
@@ -209,8 +209,7 @@ All slots are unbound, except those initialized with PARAMS."
 (cl-defmethod make-instance ((class (subclass eieio-named)) &rest args)
   (if (not (stringp (car args)))
       (cl-call-next-method)
-    (funcall (if eieio-backward-compatibility #'ignore #'message)
-             "Obsolete: name passed without :object-name to %S constructor"
+    (message "Obsolete: name passed without :object-name to %S constructor"
              class)
     (apply #'cl-call-next-method class :object-name args)))