diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-10-07 16:05:43 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-10-07 16:22:51 +0200 |
| commit | 9d14e410dac11990cf0e95a1a77e83827323530d (patch) | |
| tree | 16a949b58ddc934edabbc359c4e2856a86ce7c15 /lisp/mh-e/mh-gnus.el | |
| parent | 148b136651413d8eca0f805c786fb04b9c5878b8 (diff) | |
| download | emacs-9d14e410dac11990cf0e95a1a77e83827323530d.tar.gz | |
Delete some XEmacs compat code from mh-e/*.el
* lisp/mh-e/mh-acros.el (mh-mark-active-p):
* lisp/mh-e/mh-comp.el (mh-insert-x-mailer):
* lisp/mh-e/mh-compat.el (mh-define-obsolete-variable-alias)
(mh-make-obsolete-variable):
* lisp/mh-e/mh-folder.el (mh-folder-mode-map)
(mh-remove-xemacs-horizontal-scrollbar, mh-folder-mode):
* lisp/mh-e/mh-gnus.el (mh-gnus-local-map-property):
* lisp/mh-e/mh-show.el (mh-show-mode):
* lisp/mh-e/mh-utils.el (mh-colors-available-p):
* lisp/mh-e/mh-xface.el (mh-show-xface-function): Delete some
XEmacs compat code.
Diffstat (limited to 'lisp/mh-e/mh-gnus.el')
| -rw-r--r-- | lisp/mh-e/mh-gnus.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mh-e/mh-gnus.el b/lisp/mh-e/mh-gnus.el index cc60f7b6640..a3ba8593881 100644 --- a/lisp/mh-e/mh-gnus.el +++ b/lisp/mh-e/mh-gnus.el @@ -39,8 +39,7 @@ ;; TODO This is not in Gnus 5.11. (defun-mh mh-gnus-local-map-property gnus-local-map-property (map) "Return a list suitable for a text property list specifying keymap MAP." - (cond ((featurep 'xemacs) (list 'keymap map)) - ((>= emacs-major-version 21) (list 'keymap map)) + (cond ((>= emacs-major-version 21) (list 'keymap map)) (t (list 'local-map map)))) ;; Copy of function from mm-decode.el. |