From b63441387b47a69c45dc76f7a330c0cf8160cd1f Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 6 May 2021 03:57:28 -0400 Subject: [PATCH] lang/emacs-lisp: don't use risky-local-variable-p 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'. --- modules/lang/emacs-lisp/config.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/lang/emacs-lisp/config.el b/modules/lang/emacs-lisp/config.el index c9126fba5..fa3523619 100644 --- a/modules/lang/emacs-lisp/config.el +++ b/modules/lang/emacs-lisp/config.el @@ -44,7 +44,7 @@ employed so that flycheck still does *some* helpful linting.") (message "Ignoring unsafe form in file local variable: %S" val))) ((not (safe-local-variable-p var val)) (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)))))) :config (set-repl-handler! '(emacs-lisp-mode lisp-interaction-mode) #'+emacs-lisp/open-repl)