aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/cus-edit.el5
1 files changed, 1 insertions, 4 deletions
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."))
4970 ;; can cause problems when read back, so print them 4970 ;; can cause problems when read back, so print them
4971 ;; readably. (Bug#52554) 4971 ;; readably. (Bug#52554)
4972 (print-escape-control-characters t)) 4972 (print-escape-control-characters t))
4973 ;; Insert lexical cookie, but only if the buffer is empty.
4973 (save-restriction 4974 (save-restriction
4974 (widen) 4975 (widen)
4975 (atomic-change-group 4976 (atomic-change-group
4976 ;; The previous test `eobp' was written with an appalling
4977 ;; lack of forethought or testing, being easily misled if
4978 ;; the user should have left point at eob in a buffer
4979 ;; visiting the custom file.
4980 (when (eq (point-min) (point-max)) 4977 (when (eq (point-min) (point-max))
4981 (save-excursion 4978 (save-excursion
4982 (goto-char (point-min)) 4979 (goto-char (point-min))