diff options
| author | Stefan Kangas | 2021-12-06 22:05:57 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2021-12-06 22:19:58 +0100 |
| commit | bed5af1ea323a3b20ef505a05ccc69afaa9b645d (patch) | |
| tree | 2340edf7df2460b1d34f423fee112d996cb12c17 /test | |
| parent | e637afce45e9a982e284d344a35b523d74d88010 (diff) | |
| download | emacs-bed5af1ea323a3b20ef505a05ccc69afaa9b645d.tar.gz emacs-bed5af1ea323a3b20ef505a05ccc69afaa9b645d.zip | |
Silence byte-compiler in two tests
* test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el:
* test/lisp/mail/mail-utils-tests.el
(mail-utils-tests-mail-rfc822-time-zone): Silence byte-compiler.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el | 1 | ||||
| -rw-r--r-- | test/lisp/mail/mail-utils-tests.el | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el b/test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el index ee52d831d69..e881e46a2d1 100644 --- a/test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el +++ b/test/lisp/emacs-lisp/eieio-tests/eieio-test-methodinvoke.el | |||
| @@ -325,6 +325,7 @@ | |||
| 325 | ()) | 325 | ()) |
| 326 | 326 | ||
| 327 | (with-suppressed-warnings ((obsolete defmethod) | 327 | (with-suppressed-warnings ((obsolete defmethod) |
| 328 | (obsolete defgeneric) | ||
| 328 | (obsolete next-method-p) | 329 | (obsolete next-method-p) |
| 329 | (obsolete call-next-method)) | 330 | (obsolete call-next-method)) |
| 330 | (defmethod initialize-instance :after ((_this eitest-Jb) &rest _slots) | 331 | (defmethod initialize-instance :after ((_this eitest-Jb) &rest _slots) |
diff --git a/test/lisp/mail/mail-utils-tests.el b/test/lisp/mail/mail-utils-tests.el index 5b54f2440c7..f75de5c620c 100644 --- a/test/lisp/mail/mail-utils-tests.el +++ b/test/lisp/mail/mail-utils-tests.el | |||
| @@ -85,7 +85,8 @@ | |||
| 85 | "foo@example.org\\|bar@example.org\\|baz@example.org"))) | 85 | "foo@example.org\\|bar@example.org\\|baz@example.org"))) |
| 86 | 86 | ||
| 87 | (ert-deftest mail-utils-tests-mail-rfc822-time-zone () | 87 | (ert-deftest mail-utils-tests-mail-rfc822-time-zone () |
| 88 | (should (stringp (mail-rfc822-time-zone (current-time))))) | 88 | (with-suppressed-warnings ((obsolete mail-rfc822-time-zone)) |
| 89 | (should (stringp (mail-rfc822-time-zone (current-time)))))) | ||
| 89 | 90 | ||
| 90 | (ert-deftest mail-utils-test-mail-rfc822-date/contains-year () | 91 | (ert-deftest mail-utils-test-mail-rfc822-date/contains-year () |
| 91 | (should (string-match (rx " 20" digit digit " ") | 92 | (should (string-match (rx " 20" digit digit " ") |