summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-acros.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-10-12 14:04:21 +0200
committerStefan Kangas <stefan@marxist.se>2021-10-12 14:22:11 +0200
commit3e0b2a353519f849093086e777bde359175c4547 (patch)
treeeb70675cec83e1200a26cb6127bf83707ff53e93 /lisp/mh-e/mh-acros.el
parent1a02683ceeb6fbcebd0d7bb71dce448177f1d228 (diff)
downloademacs-3e0b2a353519f849093086e777bde359175c4547.tar.gz
Remove more MH-E compat code
* lisp/mh-e/mh-e.el (mh-strip-package-version, defgroup-mh) (defcustom-mh, defface-mh): Make Emacs 21 compat aliases obsolete. Update callers. * lisp/mh-e/mh-e.el: (mh-exchange-point-and-mark-preserving-active-mark) * lisp/mh-e/mh-folder.el (desktop-buffer-mode-handlers): * lisp/mh-e/mh-mime.el (mh-mm-inline-media-tests) (mh-have-file-command, mh-mime-security-button-map): * lisp/mh-e/mh-show.el (mh-summary-height): * lisp/mh-e/mh-speed.el (mh-process-kill-without-query): * lisp/mh-e/mh-xface.el (mh-uncompface-executable) (mh-face-to-png, mh-uncompface, mh-picon-file-contents): Remove XEmacs and Emacs 21 and older compat code.
Diffstat (limited to 'lisp/mh-e/mh-acros.el')
-rw-r--r--lisp/mh-e/mh-acros.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mh-e/mh-acros.el b/lisp/mh-e/mh-acros.el
index 575b233e1be..0669f5bb22c 100644
--- a/lisp/mh-e/mh-acros.el
+++ b/lisp/mh-e/mh-acros.el
@@ -110,11 +110,11 @@ XEmacs and versions of GNU Emacs before 21.1 require
(defmacro mh-mark-active-p (check-transient-mark-mode-flag)
"If CHECK-TRANSIENT-MARK-MODE-FLAG is non-nil then check if
variable `transient-mark-mode' is active."
+ (declare (obsolete nil "29.1"))
(cond ((not check-transient-mark-mode-flag)
- '(and (boundp 'mark-active) mark-active))
+ 'mark-active)
(t
- '(and (boundp 'transient-mark-mode) transient-mark-mode
- (boundp 'mark-active) mark-active))))
+ '(and transient-mark-mode mark-active))))
;;;###mh-autoload
(defmacro with-mh-folder-updating (save-modification-flag &rest body)