; * lisp/cus-edit.el (custom-save-all): Remove offensive commentary.

(cherry picked from commit dcb6a9ebcbf92a4ca7c0e2c393d7a8dd9b1d351e)

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index c3dd2ef67148ce4292dbd2e629bb63d2b56feed5..c448ebefd345f4e82714b5c5dca672ccdd83c7b4 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4995,13 +4995,10 @@ if only the first line of the docstring is shown."))
             ;; can cause problems when read back, so print them
             ;; readably.  (Bug#52554)
             (print-escape-control-characters t))
+        ;; Insert lexical cookie, but only if the buffer is empty.
         (save-restriction
           (widen)
           (atomic-change-group
-            ;; The previous test `eobp' was written with an appalling
-            ;; lack of forethought or testing, being easily misled if
-            ;; the user should have left point at eob in a buffer
-            ;; visiting the custom file.
             (when (eq (point-min) (point-max))
               (save-excursion
                 (goto-char (point-min))