1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/eieio-compat.el b/lisp/emacs-lisp/eieio-compat.el
index 638c475ef2b..06e65b9df80 100644
--- a/lisp/emacs-lisp/eieio-compat.el
+++ b/lisp/emacs-lisp/eieio-compat.el
@@ -143,7 +143,7 @@ Summary:
   ;; Give it a slightly higher priority than `class' so that the
   ;; interleaved list comes before the class's non-interleaved list.
   51 #'cl--generic-struct-tag
-  (lambda (tag _targets)
+  (lambda (tag &rest _)
     (and (symbolp tag) (boundp tag) (setq tag (symbol-value tag))
          (eieio--class-p tag)
          (let ((superclasses (eieio--class-precedence-list tag))