[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] feature/mhtml-mode 2d377d2 04/11: change org to use derive
From: |
Tom Tromey |
Subject: |
[Emacs-diffs] feature/mhtml-mode 2d377d2 04/11: change org to use derived-mode-p |
Date: |
Thu, 23 Mar 2017 23:15:04 -0400 (EDT) |
branch: feature/mhtml-mode
commit 2d377d2213f4dd8e180378be223753e901d6bb50
Author: Tom Tromey <address@hidden>
Commit: Tom Tromey <address@hidden>
change org to use derived-mode-p
* lisp/org/org-list.el (org-list-insert-radio-list): Use
derived-mode-p.
* lisp/org/org-table.el (orgtbl-setup, orgtbl-toggle-comment): Use
derived-mode-p.
---
lisp/org/org-list.el | 2 +-
lisp/org/org-table.el | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el
index 4a45fd9..a24c496 100644
--- a/lisp/org/org-list.el
+++ b/lisp/org/org-list.el
@@ -3035,7 +3035,7 @@ Point is left at list end."
(defun org-list-insert-radio-list ()
"Insert a radio list template appropriate for this major mode."
(interactive)
- (let* ((e (assq major-mode org-list-radio-list-templates))
+ (let* ((e (cl-assoc-if #'derived-mode-p org-list-radio-list-templates))
(txt (nth 1 e))
name pos)
(unless e (error "No radio list setup defined for %s" major-mode))
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el
index 08bbf32..0c813d0 100644
--- a/lisp/org/org-table.el
+++ b/lisp/org/org-table.el
@@ -4269,7 +4269,7 @@ to execute outside of tables."
"--"
("Radio tables"
["Insert table template" orgtbl-insert-radio-table
- (assq major-mode orgtbl-radio-table-templates)]
+ (cl-assoc-if #'derived-mode-p orgtbl-radio-table-templates)]
["Comment/uncomment table" orgtbl-toggle-comment t])
"--"
["Set Column Formula" org-table-eval-formula :active (org-at-table-p)
:keys "C-c ="]
@@ -4549,7 +4549,7 @@ First element has index 0, or I0 if given."
(defun orgtbl-insert-radio-table ()
"Insert a radio table template appropriate for this major mode."
(interactive)
- (let* ((e (assq major-mode orgtbl-radio-table-templates))
+ (let* ((e (cl-assoc-if #'derived-mode-p orgtbl-radio-table-templates))
(txt (nth 1 e))
name pos)
(unless e (user-error "No radio table setup defined for %s" major-mode))
- [Emacs-diffs] branch feature/mhtml-mode created (now 3499915), Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 9604256 01/11: change auto-insert to use derived-mode-p, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode bf7dd0c 03/11: change semantic to use derived-mode-p, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode c366e52 07/11: make smie.el respect prog-first-column, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 3adbe84 08/11: make js.el respect prog-first-column, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 6c3ceb6 02/11: change calc to use derived-mode-p, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 2d377d2 04/11: change org to use derived-mode-p,
Tom Tromey <=
- [Emacs-diffs] feature/mhtml-mode fe83525 05/11: change align to use derived-mode-p, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 3499915 11/11: enable mhtml-mode by default, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 48f5cbb 09/11: change sgml-mode to help multi-html mode, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 60be4b7 06/11: change viper to use derived-mode-p, Tom Tromey, 2017/03/23
- [Emacs-diffs] feature/mhtml-mode 23e71eb 10/11: add mhtml-mode.el, Tom Tromey, 2017/03/23