From 35953890c59f3d7fc6abe4a5f4aefc4c0d005ad4 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 11 Feb 2016 15:22:45 +1100 Subject: Remove Gnus XEmacs compatibility * lisp/gnus/gnus-demon.el (gnus-demon-idle-since): Remove XEmacs compat. * lisp/gnus/gnus-dired.el: Remove XEmacs compat. * lisp/gnus/gnus-draft.el: Remove XEmacs compat. * lisp/gnus/gnus-gravatar.el (gnus-gravatar-insert): Remove XEmacs compat. * lisp/gnus/gnus-group.el: Remove XEmacs compat. * lisp/gnus/gnus-html.el: Remove XEmacs compat. * lisp/gnus/gnus-ml.el: Remove XEmacs compat. * lisp/gnus/gnus-picon.el (gnus-picon-style): Remove XEmacs comment. --- lisp/gnus/gnus-ml.el | 9 --------- 1 file changed, 9 deletions(-) (limited to 'lisp/gnus/gnus-ml.el') diff --git a/lisp/gnus/gnus-ml.el b/lisp/gnus/gnus-ml.el index 8ff36160f09..97bbab41fd1 100644 --- a/lisp/gnus/gnus-ml.el +++ b/lisp/gnus/gnus-ml.el @@ -29,9 +29,6 @@ (require 'gnus) (require 'gnus-msg) (eval-when-compile (require 'cl)) -(eval-when-compile - (when (featurep 'xemacs) - (require 'easy-mmode))) ; for `define-minor-mode' ;;; Mailing list minor mode @@ -84,12 +81,6 @@ If FORCE is non-nil, replace the old ones." (gnus-mailing-list-mode 1)) (gnus-message 1 "no list-post in this message.")))) -(eval-when-compile - (when (featurep 'xemacs) - (defvar gnus-mailing-list-mode-hook) - (defvar gnus-mailing-list-mode-on-hook) - (defvar gnus-mailing-list-mode-off-hook))) - ;;;###autoload (define-minor-mode gnus-mailing-list-mode "Minor mode for providing mailing-list commands. -- cgit v1.2.3