diff options
| -rw-r--r-- | lisp/files-x.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/files-x.el b/lisp/files-x.el index 5353e54158e..b71e9204f32 100644 --- a/lisp/files-x.el +++ b/lisp/files-x.el | |||
| @@ -31,7 +31,6 @@ | |||
| 31 | ;;; Code: | 31 | ;;; Code: |
| 32 | 32 | ||
| 33 | (eval-when-compile (require 'subr-x)) ; for string-trim-right | 33 | (eval-when-compile (require 'subr-x)) ; for string-trim-right |
| 34 | (eval-when-compile (require 'cl-lib)) ; for cl-letf | ||
| 35 | 34 | ||
| 36 | 35 | ||
| 37 | ;;; Commands to add/delete file-local/directory-local variables. | 36 | ;;; Commands to add/delete file-local/directory-local variables. |
| @@ -690,7 +689,7 @@ This does nothing if `enable-connection-local-variables' is nil." | |||
| 690 | ;; Push them to `file-local-variables-alist'. Connection-local | 689 | ;; Push them to `file-local-variables-alist'. Connection-local |
| 691 | ;; variables do not appear from external files. So we can regard | 690 | ;; variables do not appear from external files. So we can regard |
| 692 | ;; them as safe. | 691 | ;; them as safe. |
| 693 | (cl-letf (((symbol-function 'safe-local-variable-p) (lambda (_sym _val) t))) | 692 | (let ((enable-local-variables :all)) |
| 694 | (hack-local-variables-filter connection-local-variables-alist nil)))) | 693 | (hack-local-variables-filter connection-local-variables-alist nil)))) |
| 695 | 694 | ||
| 696 | ;;;###autoload | 695 | ;;;###autoload |