From d089be69dc69f581792c3d31d3cb10a3c71e6f13 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 6 Jan 1999 08:40:50 +0000 Subject: [PATCH] (custom-save-delete): Don't delete whitespace and comments before the sexp that is replaced. --- lisp/cus-edit.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 7640f471d25..61bc9629aed 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -3102,6 +3102,8 @@ Leave point at the location of the call, or after the last expression." (goto-char (point-min)) (catch 'found (while t + ;; Skip all whitespace and comments. + (while (forward-comment 1)) (let ((start (point)) (sexp (condition-case nil (read (current-buffer)) -- 2.39.2