diff options
author | Stefan Kangas <stefan@marxist.se> | 2020-11-05 18:23:56 +0100 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2020-11-05 18:25:40 +0100 |
commit | 38a109e58c3a4d945123e3e985efd40b0626eca0 (patch) | |
tree | 6f907a0d441de365e2071ceeafd19eb982014e8d /test/lisp/emacs-lisp | |
parent | 334e2ab440a466a40b7c28d26dfe4207c6bb95e8 (diff) | |
download | emacs-38a109e58c3a4d945123e3e985efd40b0626eca0.tar.gz emacs-38a109e58c3a4d945123e3e985efd40b0626eca0.tar.bz2 emacs-38a109e58c3a4d945123e3e985efd40b0626eca0.zip |
; Silence byte-compiler warnings in tests
* test/lisp/emacs-lisp/easy-mmode-tests.el (easy-mmode--minor-mode):
* test/lisp/progmodes/cperl-mode-tests.el (cperl-bug30393):
Silence byte-compiler.
Diffstat (limited to 'test/lisp/emacs-lisp')
-rw-r--r-- | test/lisp/emacs-lisp/easy-mmode-tests.el | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/test/lisp/emacs-lisp/easy-mmode-tests.el b/test/lisp/emacs-lisp/easy-mmode-tests.el index c05379e4415..bbd01970b5b 100644 --- a/test/lisp/emacs-lisp/easy-mmode-tests.el +++ b/test/lisp/emacs-lisp/easy-mmode-tests.el @@ -44,20 +44,21 @@ '(c-mode (not message-mode mail-mode) text-mode)) t)))) +(define-minor-mode easy-mmode-test-mode "A test.") + (ert-deftest easy-mmode--minor-mode () (with-temp-buffer - (define-minor-mode test-mode "A test.") - (should (eq test-mode nil)) - (test-mode nil) - (should (eq test-mode t)) - (test-mode -33) - (should (eq test-mode nil)) - (test-mode 33) - (should (eq test-mode t)) - (test-mode 'toggle) - (should (eq test-mode nil)) - (test-mode 'toggle) - (should (eq test-mode t)))) + (should (eq easy-mmode-test-mode nil)) + (easy-mmode-test-mode nil) + (should (eq easy-mmode-test-mode t)) + (easy-mmode-test-mode -33) + (should (eq easy-mmode-test-mode nil)) + (easy-mmode-test-mode 33) + (should (eq easy-mmode-test-mode t)) + (easy-mmode-test-mode 'toggle) + (should (eq easy-mmode-test-mode nil)) + (easy-mmode-test-mode 'toggle) + (should (eq easy-mmode-test-mode t)))) (provide 'easy-mmode-tests) |