From 1a553b8be1276270cc0b78b516f93fc4300a6c11 Mon Sep 17 00:00:00 2001 From: "Eric M. Ludlam" Date: Sun, 4 Oct 1998 12:37:28 +0000 Subject: [PATCH] (checkdoc-sentencespace-region-engine): Protect a `forward-sexp' call which could fail, and improved regex for ie, and eg abbreviations. --- lisp/emacs-lisp/checkdoc.el | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 3d4e5957c38..5fd428a904a 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -2026,10 +2026,13 @@ If the offending word is in a piece of quoted text, then it is skipped." (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? " -- 2.39.2