Fix mark-defun when there's no spaces between successive defuns.
commitb8d74c4578a6a4f1cabe993209358eb84883b869
authorAlan Mackenzie <acm@muc.de>
Sat, 6 Jan 2018 11:48:32 +0000 (6 11:48 +0000)
committerAlan Mackenzie <acm@muc.de>
Sat, 6 Jan 2018 11:48:32 +0000 (6 11:48 +0000)
tree17acb67bd2ef9925b164e9a934cd7e697e746e01
parenta377c652b55db4f118076fec2cdbd65e0d61e31a
Fix mark-defun when there's no spaces between successive defuns.

The problem was a parse-partial-sexp call which tried to use the STOPBEFORE
argument to detect non-syntactic WS.  This fails on a "}", which does not
begin a sexp.

* lisp/emacs-lisp/lisp.h (beginning-of-defun--in-emptyish-line-p): Enhance to
handle BOL being in a string.
(beginning-of-defun-comments): Call the above function in place of the call
to parse-partial-sexp.
lisp/emacs-lisp/lisp.el