(news-mode): Don't set mode-name to a list.

Use mode-line-process instead.

diff --git a/lisp/mail/rnews.el b/lisp/mail/rnews.el
index 5af007dd0404bafb0a745263edc8b1d0d2d5d58e..d3e76dc190373b9420de98ff90355a0d213b7a5d 100644 (file)
--- a/lisp/mail/rnews.el
+++ b/lisp/mail/rnews.el
@@ -365,11 +365,8 @@ U       unsubscribe from specified newsgroup."
 ;  This breaks it.  I don't have time to figure out why. -- RMS
 ;  (make-local-variable 'news-group-article-assoc)
   (setq major-mode 'news-mode)
-  (if (boundp 'minor-mode-alist)
-      ;; Emacs versions 18.16 and up.
-      (setq mode-name '("NEWS" news-minor-modes))
-    ;; Earlier versions display minor-modes via a special mechanism.
-    (setq mode-name "NEWS"))
+  (setq mode-line-process '(news-minor-modes))
+  (setq mode-name "NEWS")
   (news-set-mode-line)
   (set-syntax-table text-mode-syntax-table)
   (use-local-map news-mode-map)