mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(end-of-defun): Fix check for trailing comment.

Browse source
This commit is contained in:
Karl Heuer 1994-03-18 01:47:28 +00:00
parent 5ca2ef64f0
commit 37f31acf87
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/lisp.el
View file

@ -184,7 +184,7 @@ the open-parenthesis that starts a defun; see `beginning-of-defun'."
(progn (progn
(forward-list 1) (forward-list 1)
(skip-chars-forward " \t") (skip-chars-forward " \t")
(if (looking-at "[;\n]") (if (looking-at "\\s<\\|\n")
(forward-line 1))) (forward-line 1)))
(goto-char (point-min))))) (goto-char (point-min)))))
(setq arg (1+ arg))))) (setq arg (1+ arg)))))