Skip to content

Commit

Permalink
compat-tests: Rename test
Browse files Browse the repository at this point in the history
  • Loading branch information
minad committed Nov 23, 2023
1 parent de37c4c commit ea8de2e
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion compat-26.el
Original file line number Diff line number Diff line change
Expand Up @@ -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-tests:provided-derived-mode-p>
(compat-defun provided-mode-derived-p (mode &rest modes) ;; <compat-tests:provided-mode-derived-p>
"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'."
Expand Down
2 changes: 1 addition & 1 deletion compat-tests.el
Original file line number Diff line number Diff line change
Expand Up @@ -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"))
Expand Down

0 comments on commit ea8de2e

Please sign in to comment.