Mercurial > emacs
changeset 23371:9808edcd3c95
(checkdoc-sentencespace-region-engine): Protect a `forward-sexp' call
which could fail, and improved regex for ie, and eg abbreviations.
| author | Eric M. Ludlam <zappo@gnu.org> |
|---|---|
| date | Sun, 04 Oct 1998 12:37:28 +0000 |
| parents | 7addb1da4b2b |
| children | 64e80b07376b |
| files | lisp/emacs-lisp/checkdoc.el |
| diffstat | 1 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/checkdoc.el Sat Oct 03 05:40:15 1998 +0000 +++ b/lisp/emacs-lisp/checkdoc.el Sun Oct 04 12:37:28 1998 +0000 @@ -2026,10 +2026,13 @@ (not (checkdoc-in-example-string-p begin end)) (not (save-excursion (goto-char (match-beginning 1)) - (forward-sexp -1) - ;; piece of an abbreviation - (looking-at "\\([a-z]\\|[ie]\\.?g\\)\\.") - ))) + (condition-case nil + (progn + (forward-sexp -1) + ;; piece of an abbreviation + (looking-at + "\\([a-z]\\|[iI]\\.?e\\|[eE]\\.?g\\)\\.")) + (error t))))) (if (checkdoc-autofix-ask-replace b e "There should be two spaces after a period. Fix? "