From 7d7a240d82202fcb3323453648dd2d8b78d22a6f Mon Sep 17 00:00:00 2001 From: Suhail Date: Wed, 5 Jun 2024 11:55:10 -0400 Subject: [PATCH] org-lint: Add function to remove checker(s) * lisp/org-lint.el (org-lint-remove-checker): Remove one or more checkers from org-lint--checkers. TINYCHANGE --- lisp/org-lint.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/lisp/org-lint.el b/lisp/org-lint.el index aed774ee2..ec28f5255 100644 --- a/lisp/org-lint.el +++ b/lisp/org-lint.el @@ -159,6 +159,16 @@ (defun org-lint-add-checker (seq-remove (lambda (c) (eq name (org-lint-checker-name c))) org-lint--checkers)))) +;;;###autoload +(defun org-lint-remove-checker (name &rest names) + "Remove checker(s) from linter. +NAME is the unique check identifier, as a non-nil symbol. NAMES +are additional check identifiers to be removed." + (let ((removelist (cons name names))) + (setq org-lint--checkers + (seq-remove (lambda (c) (memq (org-lint-checker-name c) removelist)) + org-lint--checkers)))) + ;;; Reports UI base-commit: bb633b67400de67b37317b6ae0741034c196c8d9 -- 2.45.1