From ea8de2ea18cf7c348aadb6eb2aeb2a9d840bd064 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Thu, 23 Nov 2023 18:58:38 +0100 Subject: compat-tests: Rename test --- compat-26.el | 2 +- compat-tests.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/compat-26.el b/compat-26.el index 0c22fbf..9d3d7b9 100644 --- a/compat-26.el +++ b/compat-26.el @@ -75,7 +75,7 @@ see `region-noncontiguous-p' and `extract-rectangle-bounds'." ;;;; Defined in subr.el -(compat-defun provided-mode-derived-p (mode &rest modes) ;; +(compat-defun provided-mode-derived-p (mode &rest modes) ;; "Non-nil if MODE is derived from one of MODES. Uses the `derived-mode-parent' property of the symbol to trace backwards. If you just want to check `major-mode', use `derived-mode-p'." diff --git a/compat-tests.el b/compat-tests.el index 106a565..cc0a2ed 100644 --- a/compat-tests.el +++ b/compat-tests.el @@ -1195,7 +1195,7 @@ (should-equal '((0 . zero) a (0 . zero)) (compat-call assoc-delete-all 0 (list (cons 0 'zero) (cons 1 'one) 'a (cons 0 'zero)) #'/=)) (should-equal '(a (0 . zero) (0 . zero)) (compat-call assoc-delete-all 0 (list 'a (cons 0 'zero) (cons 1 'one) (cons 0 'zero)) #'/=))) -(ert-deftest compat-provided-derived-mode-p () +(ert-deftest compat-provided-mode-derived-p () (let ((one (make-symbol "1")) (two (make-symbol "2")) (three (make-symbol "3")) -- cgit v1.0