diff options
| author | Nicholas Vollmer | 2024-01-05 12:22:10 -0500 |
|---|---|---|
| committer | Stefan Kangas | 2024-01-05 22:58:39 +0100 |
| commit | 790b5982175b8dcd45fe444379e8039b6cc05e97 (patch) | |
| tree | 117ee1f07f5dc95dfff3fe38a01ac3703656157e | |
| parent | f9acf12f6f17b57265d19079e6973d167a328536 (diff) | |
| download | emacs-790b5982175b8dcd45fe444379e8039b6cc05e97.tar.gz emacs-790b5982175b8dcd45fe444379e8039b6cc05e97.zip | |
Use special-mode in checkdoc status buffer
* lisp/emacs-lisp/checkdoc.el (checkdoc-display-status-buffer): Use
`special-mode'. (Bug#68268)
| -rw-r--r-- | lisp/emacs-lisp/checkdoc.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 80eaf93c3b7..82c6c03a592 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el | |||
| @@ -556,7 +556,8 @@ the users will view as each check is completed." | |||
| 556 | "Display and update the status buffer for the current checkdoc mode. | 556 | "Display and update the status buffer for the current checkdoc mode. |
| 557 | CHECK is a list of four strings stating the current status of each | 557 | CHECK is a list of four strings stating the current status of each |
| 558 | test; the nth string describes the status of the nth test." | 558 | test; the nth string describes the status of the nth test." |
| 559 | (let (temp-buffer-setup-hook) | 559 | (let (temp-buffer-setup-hook |
| 560 | (temp-buffer-show-hook #'special-mode)) | ||
| 560 | (with-output-to-temp-buffer "*Checkdoc Status*" | 561 | (with-output-to-temp-buffer "*Checkdoc Status*" |
| 561 | (mapc #'princ | 562 | (mapc #'princ |
| 562 | (list "Buffer comments and tags: " (nth 0 check) | 563 | (list "Buffer comments and tags: " (nth 0 check) |