awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

lang/emacs-lisp: don't use risky-local-variable-p

Browse Source 
It's hardcoded to return t for symbols that end in any of '-command',
'-frame-alist', '-function', '-functions', '-hook', '-hooks', '-form',
'-forms', '-map', '-map-alist', '-mode-alist', '-program', or
'-predicate' -- which I think is excessive next to a safety check.

I'll trust that: if the user marks X as safe, and it isn't *explicitly*
marked risky, and it destroys the universe, then it's their fault, not
mine, not Emacs'.
This commit is contained in:
Henrik Lissner
2021-05-06 03:57:28 -04:00
parent 52fba3fa60
commit b63441387b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
modules/lang/emacs-lisp/config.el
View File

@ -44,7 +44,7 @@ employed so that flycheck still does *some* helpful linting.")
(message "Ignoring unsafe form in file local variable: %S" val))) (message "Ignoring unsafe form in file local variable: %S" val)))
((not (safe-local-variable-p var val)) ((not (safe-local-variable-p var val))
(message "Ignoring unsafe file local variable: %S" var)) (message "Ignoring unsafe file local variable: %S" var))
((risky-local-variable-p var val) ((get sym 'risky-local-variable)
(message "Ignoring risky file local variable: %S" var)))))) (message "Ignoring risky file local variable: %S" var))))))
:config :config
(set-repl-handler! '(emacs-lisp-mode lisp-interaction-mode) #'+emacs-lisp/open-repl) (set-repl-handler! '(emacs-lisp-mode lisp-interaction-mode) #'+emacs-lisp/open-repl)