diff options
| author | Stefan Monnier | 2015-11-04 09:42:20 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2015-11-04 09:42:20 -0500 |
| commit | 54e2ed97bf904eda2ee5ae9b7822288e10b3abc5 (patch) | |
| tree | c69c933b9ddd53a7715ec1e5dff31d28dad257b7 | |
| parent | 39355bc045874874eb83cecdf2e2e04c3b81d3f7 (diff) | |
| download | emacs-54e2ed97bf904eda2ee5ae9b7822288e10b3abc5.tar.gz emacs-54e2ed97bf904eda2ee5ae9b7822288e10b3abc5.zip | |
* 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 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: | ||