]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/emacs-lisp/eieio-compat.el: Typo caught by tests
authorStefan Monnier <monnier@iro.umontreal.ca>
Wed, 4 Nov 2015 14:42:20 +0000 (09:42 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Wed, 4 Nov 2015 14:42:20 +0000 (09:42 -0500)
(eieio--generic-static-object-generalizer): Fix typo.
* test/automated/eieio-tests.el: Byte-compile it again.
It looks like the underlying cause of bug#17852 was fixed in the mean time.

lisp/emacs-lisp/eieio-compat.el
test/automated/eieio-tests.el

index 638c475ef2b8731247aafff2f48145627a8e1976..06e65b9df8066897aca6eadaf4f0f8018bc9d975 100644 (file)
@@ -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))
index 5709a1bfeb2f32d70352afaa633ab4473b425514..915532b299cbf282c8859c0344737e78d0965f62 100644 (file)
@@ -898,7 +898,3 @@ Subclasses to override slot attributes.")
 (provide 'eieio-tests)
 
 ;;; eieio-tests.el ends here
-
-;; Local Variables:
-;; no-byte-compile: t
-;; End: