summaryrefslogtreecommitdiff
path: root/lisp/files-x.el
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2023-03-13 18:02:36 +0100
committerMichael Albinus <michael.albinus@gmx.de>2023-03-13 18:02:36 +0100
commit36ade0704e1829fd27970e8d478cf4b52deed517 (patch)
treed30244acb0e63525dfcf0b60fe722629108ce74e /lisp/files-x.el
parente759905d2e0828eac4c8164b09113b40f6899656 (diff)
downloademacs-36ade0704e1829fd27970e8d478cf4b52deed517.tar.gz
emacs-36ade0704e1829fd27970e8d478cf4b52deed517.tar.bz2
emacs-36ade0704e1829fd27970e8d478cf4b52deed517.zip
Fix connection-local variables settings
; * etc/NEWS: Fix typos. * lisp/files-x.el (connection-local-set-profiles) (connection-local-set-profile-variables): Use NOW when calling `custom-set-variables'. * test/lisp/files-x-tests.el (files-x-test-connection-local-set-profile-variables) (files-x-test-connection-local-update-profile-variables) (files-x-test-connection-local-set-profiles) (files-x-test-hack-connection-local-variables-apply) (files-x-test-with-connection-local-variables) (files-x-test-setq-connection-local): Fix tests. * test/lisp/net/tramp-tests.el (tramp-test34-connection-local-variables) (tramp-test34-explicit-shell-file-name): Fix tests.
Diffstat (limited to 'lisp/files-x.el')
-rw-r--r--lisp/files-x.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/files-x.el b/lisp/files-x.el
index be27aedf2e2..548d9efc193 100644
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -682,7 +682,7 @@ variables for a connection profile are defined using
(cons (cons criteria (delete-dups profiles))
connection-local-criteria-alist))))
(custom-set-variables
- `(connection-local-criteria-alist ',connection-local-criteria-alist)))
+ `(connection-local-criteria-alist ',connection-local-criteria-alist now)))
(defsubst connection-local-get-profile-variables (profile)
"Return the connection-local variable list for PROFILE."
@@ -703,7 +703,7 @@ VARIABLES list of the connection profile. The list is processed
in order."
(setf (alist-get profile connection-local-profile-alist) variables)
(custom-set-variables
- `(connection-local-profile-alist ',connection-local-profile-alist)))
+ `(connection-local-profile-alist ',connection-local-profile-alist now)))
;;;###autoload
(defun connection-local-update-profile-variables (profile variables)