master 6058d3ebb4: Respect customization nature of `connection-local-*' user options

[Michael Albinus]

branch: master
commit 6058d3ebb4170fb70ebb78b42c0bc1e12fb96134
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Respect customization nature of `connection-local-*' user options
    
    * lisp/files-x.el (connection-local-set-profiles)
    (connection-local-set-profile-variables): Set user options via
    `customize-set-variable'.
---
 lisp/files-x.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/files-x.el b/lisp/files-x.el
index 773339d748..319bfe0565 100644
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -668,7 +668,9 @@ variables for a connection profile are defined using
         (setcdr slot (delete-dups (append (cdr slot) profiles)))
       (setq connection-local-criteria-alist
             (cons (cons criteria (delete-dups profiles))
-                 connection-local-criteria-alist)))))
+                 connection-local-criteria-alist))))
+  (customize-set-variable
+   'connection-local-criteria-alist connection-local-criteria-alist))
 
 (defsubst connection-local-get-profile-variables (profile)
   "Return the connection-local variable list for PROFILE."
@@ -687,7 +689,9 @@ connection profile using `connection-local-set-profiles'.  
Then
 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))
+  (setf (alist-get profile connection-local-profile-alist) variables)
+  (customize-set-variable
+   'connection-local-profile-alist connection-local-profile-alist))
 
 (defun hack-connection-local-variables (criteria)
   "Read connection-local variables according to CRITERIA.