(custom-save-all): Use find-file-visit-truename for visiting the custom file.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index af4cc43daec..d698aaeecc3 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4193,7 +4193,8 @@ if only the first line of the docstring is shown."))
                                             "\\'")
                                     recentf-exclude)))
          (old-buffer (find-buffer-visiting filename)))
-    (with-current-buffer (or old-buffer (find-file-noselect filename))
+    (with-current-buffer (let ((find-file-visit-truename t))
+                           (or old-buffer (find-file-noselect filename)))
       (unless (eq major-mode 'emacs-lisp-mode)
         (emacs-lisp-mode))
       (let ((inhibit-read-only t))