From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 11 May 2024 17:13:17 +0000 (+0300)
Subject: ; * lisp/cus-edit.el (custom-save-all): Remove offensive commentary.
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~2^2~20^2~1544
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=dcb6a9ebcbf92a4ca7c0e2c393d7a8dd9b1d351e;p=emacs.git

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

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 54d648f7ec0..19449afbd2b 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4970,13 +4970,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))