diff options
| author | Basil L. Contovounesios | 2020-06-21 13:42:14 +0100 |
|---|---|---|
| committer | Basil L. Contovounesios | 2020-06-21 13:42:14 +0100 |
| commit | 1ecd350f38ee782cdebf4b08a59f2c1974ad44bd (patch) | |
| tree | 7fcad02ffb6e21175a34361064479c399409be1e /test | |
| parent | 4cc6854cd4b0857e223ed6bc1b1b1a051dd83480 (diff) | |
| download | emacs-1ecd350f38ee782cdebf4b08a59f2c1974ad44bd.tar.gz emacs-1ecd350f38ee782cdebf4b08a59f2c1974ad44bd.zip | |
Evaluate some unnecessarily quoted lambdas
* lisp/cedet/semantic/complete.el
(semantic-displayer-tooltip-max-tags):
* lisp/emacs-lisp/benchmark.el (benchmark-run-compiled):
* lisp/emacs-lisp/package.el (package--default-summary)
(package-menu-filter-by-version):
* lisp/eshell/em-pred.el (eshell-pred-file-time):
* lisp/progmodes/verilog-mode.el (verilog-auto-lineup)
(verilog-auto-reset-widths, verilog-auto-arg-format)
(verilog-auto-inst-vector, verilog-auto-inst-template-numbers):
* lisp/textmodes/bibtex.el (bibtex-dialect):
* test/lisp/autoinsert-tests.el
(autoinsert-tests-define-auto-insert-before)
(autoinsert-tests-define-auto-insert-after): Remove some unnecessary
quoting around anonymous functions.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/autoinsert-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/lisp/autoinsert-tests.el b/test/lisp/autoinsert-tests.el index 574763c4b3d..eafa9c6c02c 100644 --- a/test/lisp/autoinsert-tests.el +++ b/test/lisp/autoinsert-tests.el | |||
| @@ -79,10 +79,10 @@ | |||
| 79 | 79 | ||
| 80 | (ert-deftest autoinsert-tests-define-auto-insert-before () | 80 | (ert-deftest autoinsert-tests-define-auto-insert-before () |
| 81 | (let ((auto-insert-alist | 81 | (let ((auto-insert-alist |
| 82 | (list (cons 'text-mode '(lambda () (insert "foo"))))) | 82 | (list (cons 'text-mode (lambda () (insert "foo"))))) |
| 83 | (auto-insert-query nil)) | 83 | (auto-insert-query nil)) |
| 84 | (define-auto-insert 'text-mode | 84 | (define-auto-insert 'text-mode |
| 85 | '(lambda () (insert "bar"))) | 85 | (lambda () (insert "bar"))) |
| 86 | (with-temp-buffer | 86 | (with-temp-buffer |
| 87 | (text-mode) | 87 | (text-mode) |
| 88 | (auto-insert) | 88 | (auto-insert) |
| @@ -90,10 +90,10 @@ | |||
| 90 | 90 | ||
| 91 | (ert-deftest autoinsert-tests-define-auto-insert-after () | 91 | (ert-deftest autoinsert-tests-define-auto-insert-after () |
| 92 | (let ((auto-insert-alist | 92 | (let ((auto-insert-alist |
| 93 | (list (cons 'text-mode '(lambda () (insert "foo"))))) | 93 | (list (cons 'text-mode (lambda () (insert "foo"))))) |
| 94 | (auto-insert-query nil)) | 94 | (auto-insert-query nil)) |
| 95 | (define-auto-insert 'text-mode | 95 | (define-auto-insert 'text-mode |
| 96 | '(lambda () (insert "bar")) | 96 | (lambda () (insert "bar")) |
| 97 | t) | 97 | t) |
| 98 | (with-temp-buffer | 98 | (with-temp-buffer |
| 99 | (text-mode) | 99 | (text-mode) |