diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-11-04 09:42:20 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-11-04 09:42:20 -0500 |
| commit | 54e2ed97bf904eda2ee5ae9b7822288e10b3abc5 (patch) | |
| tree | c69c933b9ddd53a7715ec1e5dff31d28dad257b7 | |
| parent | 39355bc045874874eb83cecdf2e2e04c3b81d3f7 (diff) | |
* lisp/emacs-lisp/eieio-compat.el: Typo caught by tests
(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.
| -rw-r--r-- | lisp/emacs-lisp/eieio-compat.el | 2 | ||||
| -rw-r--r-- | test/automated/eieio-tests.el | 4 |
2 files changed, 1 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/eieio-compat.el b/lisp/emacs-lisp/eieio-compat.el index 638c475ef2..06e65b9df8 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)) diff --git a/test/automated/eieio-tests.el b/test/automated/eieio-tests.el index 5709a1bfeb..915532b299 100644 --- a/test/automated/eieio-tests.el +++ b/test/automated/eieio-tests.el @@ -898,7 +898,3 @@ Subclasses to override slot attributes.") (provide 'eieio-tests) ;;; eieio-tests.el ends here - -;; Local Variables: -;; no-byte-compile: t -;; End: |