; * lisp/emacs-lisp/checkdoc.el: Fix warnings.
This commit is contained in:
parent
b2bb717d4b
commit
f41a4ec8e1
1 changed files with 5 additions and 4 deletions
|
@ -164,6 +164,7 @@
|
|||
(require 'cl-lib)
|
||||
(require 'help-mode) ;; for help-xref-info-regexp
|
||||
(require 'thingatpt) ;; for handy thing-at-point-looking-at
|
||||
(require 'dired) ;; for dired-get-filename and dired-map-over-marks
|
||||
(require 'lisp-mnt)
|
||||
|
||||
(defvar compilation-error-regexp-alist)
|
||||
|
@ -278,6 +279,8 @@ Currently, all recognized keywords must be on `finder-known-keywords'."
|
|||
:version "25.1"
|
||||
:type 'boolean)
|
||||
|
||||
(define-obsolete-variable-alias 'checkdoc-style-hooks
|
||||
'checkdoc-style-functions "24.3")
|
||||
(defvar checkdoc-style-functions nil
|
||||
"Hook run after the standard style check is completed.
|
||||
All functions must return nil or a string representing the error found.
|
||||
|
@ -287,6 +290,8 @@ Each hook is called with two parameters, (DEFUNINFO ENDPOINT).
|
|||
DEFUNINFO is the return value of `checkdoc-defun-info'. ENDPOINT is the
|
||||
location of end of the documentation string.")
|
||||
|
||||
(define-obsolete-variable-alias 'checkdoc-comment-style-hooks
|
||||
'checkdoc-comment-style-functions "24.3")
|
||||
(defvar checkdoc-comment-style-functions nil
|
||||
"Hook run after the standard comment style check is completed.
|
||||
Must return nil if no errors are found, or a string describing the
|
||||
|
@ -2806,10 +2811,6 @@ function called to create the messages."
|
|||
|
||||
;; Obsolete
|
||||
|
||||
(define-obsolete-variable-alias 'checkdoc-style-hooks
|
||||
'checkdoc-style-functions "24.3")
|
||||
(define-obsolete-variable-alias 'checkdoc-comment-style-hooks
|
||||
'checkdoc-comment-style-functions "24.3")
|
||||
(define-obsolete-function-alias 'checkdoc-run-hooks
|
||||
#'run-hook-with-args-until-success "28.1")
|
||||
(defvar checkdoc-version "0.6.2"
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue