procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(checkdoc-sentencespace-region-engine): Protect a `forward-sexp' call

Browse source 
which could fail, and improved regex for ie, and eg abbreviations.
This commit is contained in:
Eric M. Ludlam 1998-10-04 12:37:28 +00:00
parent 75c0d0950d
commit 1a553b8be1
1 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/emacs-lisp/checkdoc.el
View file

@ -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? "