procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(custom-save-delete): Avoid error for empty .emacs.

Browse source
This commit is contained in:
Karl Heuer 1999-07-25 05:50:42 +00:00
parent b108eac242
commit cbe8bb8e18
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/cus-edit.el
View file

@ -3101,7 +3101,10 @@ Leave point at the location of the call, or after the last expression."
(let ((default-major-mode))
(set-buffer (find-file-noselect (custom-file))))
(goto-char (point-min))
(save-excursion (forward-sexp (buffer-size))) ; Test for scan errors.
;; Skip all whitespace and comments.
(while (forward-comment 1))
(or (eobp)
(save-excursion (forward-sexp (buffer-size)))) ; Test for scan errors.
(catch 'found
(while t
;; Skip all whitespace and comments.