diff options
author | Karl Heuer <kwzh@gnu.org> | 1994-03-18 01:47:28 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1994-03-18 01:47:28 +0000 |
commit | 37f31acf876064714d3498ae7436174f0b4c83c5 (patch) | |
tree | 87daf62bcb6424116044c18bd3ca5f99a5c9de8d /lisp/emacs-lisp | |
parent | 5ca2ef64f0ee2c0b57f929bd474bccc051289d06 (diff) | |
download | emacs-37f31acf876064714d3498ae7436174f0b4c83c5.tar.gz emacs-37f31acf876064714d3498ae7436174f0b4c83c5.tar.bz2 emacs-37f31acf876064714d3498ae7436174f0b4c83c5.zip |
(end-of-defun): Fix check for trailing comment.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/lisp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index 2f918b93573..ebe0885c769 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -184,7 +184,7 @@ the open-parenthesis that starts a defun; see `beginning-of-defun'." (progn (forward-list 1) (skip-chars-forward " \t") - (if (looking-at "[;\n]") + (if (looking-at "\\s<\\|\n") (forward-line 1))) (goto-char (point-min))))) (setq arg (1+ arg))))) |