diff options
| author | Juanma Barranquero | 2015-11-05 22:47:52 +0100 |
|---|---|---|
| committer | Juanma Barranquero | 2015-11-05 22:47:52 +0100 |
| commit | 7afaf0c0def0966722f7048cbb012c36fbfe48ac (patch) | |
| tree | 2a56d0c3a354c8820a5614dc49f8003d0bb59cc6 | |
| parent | ddb8069d9bf3d7a584d690e73c91b00454fe5ec1 (diff) | |
| download | emacs-7afaf0c0def0966722f7048cbb012c36fbfe48ac.tar.gz emacs-7afaf0c0def0966722f7048cbb012c36fbfe48ac.zip | |
* test/automated/elisp-mode-test.el: Silence some run-time warnings
(xref-elisp-deftest): Bind `find-file-suppress-same-file-warnings' to t.
| -rw-r--r-- | test/automated/elisp-mode-tests.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/test/automated/elisp-mode-tests.el b/test/automated/elisp-mode-tests.el index 1085b549c03..38c0b3be056 100644 --- a/test/automated/elisp-mode-tests.el +++ b/test/automated/elisp-mode-tests.el | |||
| @@ -208,8 +208,9 @@ to (xref-elisp-test-descr-to-target xref)." | |||
| 208 | (declare (indent defun) | 208 | (declare (indent defun) |
| 209 | (debug (symbolp "name"))) | 209 | (debug (symbolp "name"))) |
| 210 | `(ert-deftest ,(intern (concat "xref-elisp-test-" (symbol-name name))) () | 210 | `(ert-deftest ,(intern (concat "xref-elisp-test-" (symbol-name name))) () |
| 211 | (xref-elisp-test-run ,computed-xrefs ,expected-xrefs) | 211 | (let ((find-file-suppress-same-file-warnings t)) |
| 212 | )) | 212 | (xref-elisp-test-run ,computed-xrefs ,expected-xrefs) |
| 213 | ))) | ||
| 213 | 214 | ||
| 214 | ;; When tests are run from the Makefile, 'default-directory' is $HOME, | 215 | ;; When tests are run from the Makefile, 'default-directory' is $HOME, |
| 215 | ;; so we must provide this dir to expand-file-name in the expected | 216 | ;; so we must provide this dir to expand-file-name in the expected |