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:
parent
8bc12a2736
commit
fffbce2934
1 changed files with 4 additions and 4 deletions
|
@ -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)
|
||||
|
|
Loading…
Add table
Reference in a new issue