TRework fix for bug#62106

* lisp/files-x.el (connection-local-set-profiles)
(connection-local-set-profile-variables):
Use `custom-set-variables'.  It serves the purpose to not keep
unsaved user options, and it is less invasive than
`customize-save-variable'.
This commit is contained in:
Michael Albinus 2023-03-12 11:01:22 +01:00
parent 8bc12a2736
commit fffbce2934

View file

@ -681,8 +681,8 @@ variables for a connection profile are defined using
(setq connection-local-criteria-alist
(cons (cons criteria (delete-dups profiles))
connection-local-criteria-alist))))
(customize-save-variable
'connection-local-criteria-alist connection-local-criteria-alist))
(custom-set-variables
`(connection-local-criteria-alist ',connection-local-criteria-alist)))
(defsubst connection-local-get-profile-variables (profile)
"Return the connection-local variable list for PROFILE."
@ -702,8 +702,8 @@ variables are set in the server's process buffer according to the
VARIABLES list of the connection profile. The list is processed
in order."
(setf (alist-get profile connection-local-profile-alist) variables)
(customize-save-variable
'connection-local-profile-alist connection-local-profile-alist))
(custom-set-variables
`(connection-local-profile-alist ',connection-local-profile-alist)))
;;;###autoload
(defun connection-local-update-profile-variables (profile variables)