diff options
author | Stefan Kangas <stefan@marxist.se> | 2021-10-12 14:04:21 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2021-10-12 14:22:11 +0200 |
commit | 3e0b2a353519f849093086e777bde359175c4547 (patch) | |
tree | eb70675cec83e1200a26cb6127bf83707ff53e93 /lisp/mh-e/mh-acros.el | |
parent | 1a02683ceeb6fbcebd0d7bb71dce448177f1d228 (diff) | |
download | emacs-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.el | 6 |
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) |