mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-17 11:20:39 -08:00
; * lisp/emacs-lisp/checkdoc.el (checkdoc-in-abbreviation-p): Doc fix.
This commit is contained in:
parent
01e17fd4e9
commit
2932592469
1 changed files with 2 additions and 2 deletions
|
|
@ -2093,7 +2093,7 @@ The text checked is between START and LIMIT."
|
||||||
|
|
||||||
(defun checkdoc-in-abbreviation-p (begin)
|
(defun checkdoc-in-abbreviation-p (begin)
|
||||||
"Return non-nil if point is at an abbreviation.
|
"Return non-nil if point is at an abbreviation.
|
||||||
Examples of abbreviations handled: \"e.g.\", \"i.e.\", \"cf.\"."
|
Examples of recognized abbreviations: \"e.g.\", \"i.e.\", \"cf.\"."
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(goto-char begin)
|
(goto-char begin)
|
||||||
(condition-case nil
|
(condition-case nil
|
||||||
|
|
@ -2120,7 +2120,7 @@ Examples of abbreviations handled: \"e.g.\", \"i.e.\", \"cf.\"."
|
||||||
"etc" ; etc.
|
"etc" ; etc.
|
||||||
"vs" ; vs.
|
"vs" ; vs.
|
||||||
;; Some non-standard or less common ones that we
|
;; Some non-standard or less common ones that we
|
||||||
;; might as well ignore.
|
;; might as well accept.
|
||||||
"Inc" "Univ" "misc" "resp")
|
"Inc" "Univ" "misc" "resp")
|
||||||
"."))))
|
"."))))
|
||||||
(error t))))
|
(error t))))
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue