diff --git a/lisp/files-x.el b/lisp/files-x.el
index 5fa0129e9d0..eb236c68e52 100644
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -681,7 +681,7 @@ variables for a connection profile are defined using
       (setq connection-local-criteria-alist
             (cons (cons criteria (delete-dups profiles))
 		  connection-local-criteria-alist))))
-  (customize-set-variable
+  (customize-save-variable
    'connection-local-criteria-alist connection-local-criteria-alist))
 
 (defsubst connection-local-get-profile-variables (profile)
@@ -702,7 +702,7 @@ 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-set-variable
+  (customize-save-variable
    'connection-local-profile-alist connection-local-profile-alist))
 
 ;;;###autoload