diff options
| author | Tom Tromey <tom@tromey.com> | 2017-03-18 23:06:05 +0100 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2017-04-05 15:53:38 -0600 |
| commit | 95aba610f1c1a40b0218b64b4d20ade7a6299208 (patch) | |
| tree | 169876feadc71357a792a9691a5bdf882240c5c4 /lisp/align.el | |
| parent | c92bae9a08cc7c2eb61bad32d9a9d6553b6d2c19 (diff) | |
| download | emacs-95aba610f1c1a40b0218b64b4d20ade7a6299208.tar.gz | |
change align to use derived-mode-p
* lisp/align.el (align-region): Use derived-mode-p.
Diffstat (limited to 'lisp/align.el')
| -rw-r--r-- | lisp/align.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/align.el b/lisp/align.el index b6a855b4954..000b63ed785 100644 --- a/lisp/align.el +++ b/lisp/align.el @@ -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) |