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'.

diff --git a/lisp/files-x.el b/lisp/files-x.el
index eb236c68e52183a5ebf9190e9e7acd1c79ceb6ee..be27aedf2e21fca3d48fef326304d5b554d71e80 100644 (file)
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -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)