Zander671/emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make the scratch buffer trusted

Browse Source
This commit is contained in:
Alexander Rosenberg 2025-01-03 20:16:54 -08:00
parent 96c175e0bb
commit 14467fb9f8
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
elisp/trusted-files.el
View File

@ -209,8 +209,13 @@ Each element in this list is:
(with-current-buffer buffer (with-current-buffer buffer
(derived-mode-p 'eshell-mode))) (derived-mode-p 'eshell-mode)))
(defun trusted-files--scratch-buffer-p (buffer)
"Return non-nil if BUFFER is a `scratch-buffer' buffer."
(and (equal (buffer-name buffer) "*scratch*")
(not (buffer-file-name buffer))))
(defcustom trusted-files-always-trusted-buffer-functions (defcustom trusted-files-always-trusted-buffer-functions
'(minibufferp trusted-files--eshell-buffer-p) '(minibufferp trusted-files--eshell-buffer-p trusted-files--scratch-buffer-p)
"A list of functions that are called to test if the current buffer is safe. "A list of functions that are called to test if the current buffer is safe.
When a buffer is tested for safety (via `trusted-files-safe-p'), this hook is When a buffer is tested for safety (via `trusted-files-safe-p'), this hook is
run. If any function returns non-nil, the current buffer is considered safe run. If any function returns non-nil, the current buffer is considered safe