Mercurial > emacs
changeset 110187:98d8e4cd2326
* lisp/emacs-lisp/syntax.el (syntax-ppss): More sanity check to catch
border case in change-log-mode.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sun, 05 Sep 2010 00:51:39 +0200 |
| parents | 5328ea5b6e41 |
| children | 92e4fa270c92 |
| files | lisp/ChangeLog lisp/emacs-lisp/syntax.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat Sep 04 16:42:03 2010 -0400 +++ b/lisp/ChangeLog Sun Sep 05 00:51:39 2010 +0200 @@ -1,3 +1,8 @@ +2010-09-04 Stefan Monnier <monnier@iro.umontreal.ca> + + * emacs-lisp/syntax.el (syntax-ppss): More sanity check to catch + border case in change-log-mode. + 2010-09-04 Chong Yidong <cyd@stupidchicken.com> * progmodes/compile.el (compilation-error-regexp-alist-alist):
--- a/lisp/emacs-lisp/syntax.el Sat Sep 04 16:42:03 2010 -0400 +++ b/lisp/emacs-lisp/syntax.el Sun Sep 05 00:51:39 2010 +0200 @@ -209,7 +209,8 @@ (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))))