Prevent unsafe file variable prompts on help links

This commit is contained in:
Henrik Lissner 2018-06-17 17:26:15 +02:00
parent ce86fa0557
commit 6490c4b922
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -110,7 +110,7 @@ the command buffer."
;; `help-mode' ;; `help-mode'
(after! help-mode (after! help-mode
(defun doom--switch-from-popup (location) (defun doom--switch-from-popup (location)
(let (origin) (let (origin enable-local-variables)
(save-popups! (save-popups!
(switch-to-buffer (car location) nil t) (switch-to-buffer (car location) nil t)
(if (not (cdr location)) (if (not (cdr location))
@ -154,6 +154,7 @@ the command buffer."
;; Open link in origin window (non-popup) instead of inside the popup window. ;; Open link in origin window (non-popup) instead of inside the popup window.
(defun +popup*helpful--navigate (button) (defun +popup*helpful--navigate (button)
(let ((path (substring-no-properties (button-get button 'path))) (let ((path (substring-no-properties (button-get button 'path)))
enable-local-variables
origin) origin)
(save-popups! (save-popups!
(find-file path) (find-file path)