aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/eieio-compat.el2
-rw-r--r--test/automated/eieio-tests.el4
2 files changed, 1 insertions, 5 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:
143 ;; Give it a slightly higher priority than `class' so that the 143 ;; Give it a slightly higher priority than `class' so that the
144 ;; interleaved list comes before the class's non-interleaved list. 144 ;; interleaved list comes before the class's non-interleaved list.
145 51 #'cl--generic-struct-tag 145 51 #'cl--generic-struct-tag
146 (lambda (tag _targets) 146 (lambda (tag &rest _)
147 (and (symbolp tag) (boundp tag) (setq tag (symbol-value tag)) 147 (and (symbolp tag) (boundp tag) (setq tag (symbol-value tag))
148 (eieio--class-p tag) 148 (eieio--class-p tag)
149 (let ((superclasses (eieio--class-precedence-list tag)) 149 (let ((superclasses (eieio--class-precedence-list tag))
diff --git a/test/automated/eieio-tests.el b/test/automated/eieio-tests.el
index 5709a1bfeb2..915532b299c 100644
--- a/test/automated/eieio-tests.el
+++ b/test/automated/eieio-tests.el
@@ -898,7 +898,3 @@ Subclasses to override slot attributes.")
898(provide 'eieio-tests) 898(provide 'eieio-tests)
899 899
900;;; eieio-tests.el ends here 900;;; eieio-tests.el ends here
901
902;; Local Variables:
903;; no-byte-compile: t
904;; End: