* lisp/emacs-lisp/syntax.el (syntax-ppss): More sanity check to catch
border case in change-log-mode.
This commit is contained in:
parent
13ef65a483
commit
2e664aab0b
2 changed files with 7 additions and 1 deletions
|
@ -209,7 +209,8 @@ Point is at POS when this function returns."
|
|||
(funcall syntax-begin-function)
|
||||
;; Make sure it's better.
|
||||
(> (point) pt-best))
|
||||
;; Simple sanity check.
|
||||
;; Simple sanity checks.
|
||||
(< (point) pos) ; backward-paragraph can fail here.
|
||||
(not (memq (get-text-property (point) 'face)
|
||||
'(font-lock-string-face font-lock-doc-face
|
||||
font-lock-comment-face))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue