change align to use derived-mode-p

* lisp/align.el (align-region): Use derived-mode-p.
This commit is contained in:
Tom Tromey 2017-03-18 23:06:05 +01:00
parent c92bae9a08
commit 95aba610f1

View file

@ -1322,7 +1322,7 @@ aligner would have dealt with are."
(modes (assq 'modes rule)))
;; unless the `run-if' form tells us not to, look for the
;; rule..
(unless (or (and modes (not (memq major-mode
(unless (or (and modes (not (cl-member-if #'derived-mode-p
(eval (cdr modes)))))
(and run-if (not (funcall (cdr run-if)))))
(let* ((case-fold-search case-fold-search)