[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master e97d3e1 08/11: Remove some compat code from epa.el
From: |
Lars Ingebrigtsen |
Subject: |
master e97d3e1 08/11: Remove some compat code from epa.el |
Date: |
Wed, 12 Aug 2020 12:59:55 -0400 (EDT) |
branch: master
commit e97d3e1a268c33ed6da420fa1d3a18268a1f6b91
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Remove some compat code from epa.el
* lisp/epa.el (epa--derived-mode-p, epa-import-keys): Make
defalias obsolete, and adjust a comment.
---
lisp/epa.el | 13 ++-----------
1 file changed, 2 insertions(+), 11 deletions(-)
diff --git a/lisp/epa.el b/lisp/epa.el
index 3c7dd83..a2c5fb4 100644
--- a/lisp/epa.el
+++ b/lisp/epa.el
@@ -1105,16 +1105,7 @@ If no one is selected, default secret key is used. "
'start-open t
'end-open t)))))
-(defalias 'epa--derived-mode-p
- (if (fboundp 'derived-mode-p)
- #'derived-mode-p
- (lambda (&rest modes)
- "Non-nil if the current major mode is derived from one of MODES.
-Uses the `derived-mode-parent' property of the symbol to trace backwards."
- (let ((parent major-mode))
- (while (and (not (memq parent modes))
- (setq parent (get parent 'derived-mode-parent))))
- parent))))
+(define-obsolete-function-alias 'epa--derived-mode-p 'derived-mode-p "28.1")
;;;###autoload
(defun epa-encrypt-region (start end recipients sign signers)
@@ -1227,7 +1218,7 @@ If no one is selected, symmetric encryption will be
performed. ")
(if (epg-context-result-for context 'import)
(epa-display-info (epg-import-result-to-string
(epg-context-result-for context 'import))))
- ;; FIXME: Why not use the (otherwise unused) epa--derived-mode-p?
+ ;; FIXME: Why not use the derived-mode-p?
(if (eq major-mode 'epa-key-list-mode)
(apply #'epa--list-keys epa-list-keys-arguments))))
- master updated (6cddb73 -> 56a44a8), Lars Ingebrigtsen, 2020/08/12
- master 51ea541 01/11: Remove some compat code from ediff-init.el, Lars Ingebrigtsen, 2020/08/12
- master af6ea55 07/11: Remove some compat code from bubbles.el, Lars Ingebrigtsen, 2020/08/12
- master 74909e1 06/11: Fix a check for whether Emacs can play sounds in eudc-bob, Lars Ingebrigtsen, 2020/08/12
- master a459e52 02/11: Remove some compat code from idlwave.el, Lars Ingebrigtsen, 2020/08/12
- master 77907b2 03/11: Remove some compat code from prolog.el, Lars Ingebrigtsen, 2020/08/12
- master e97d3e1 08/11: Remove some compat code from epa.el,
Lars Ingebrigtsen <=
- master 9a929de 10/11: Remove some compat code from viper*.el, Lars Ingebrigtsen, 2020/08/12
- master 56a44a8 11/11: Remove some compat code from viper-cmd.el, Lars Ingebrigtsen, 2020/08/12
- master 6ac22bc 05/11: Remove some compat code from allout.el, Lars Ingebrigtsen, 2020/08/12
- master 67bd8a4 04/11: Remove some compat code from allout*.el, Lars Ingebrigtsen, 2020/08/12
- master 1dfb170 09/11: Mark some unused defaliases in semantic/fw.el obsolete, Lars Ingebrigtsen, 2020/08/12