From 047c7fab242eae530326838e1c92235f5f646738 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 9 Mar 2000 03:10:42 +0000 Subject: [PATCH] (gnus-setup-news): Update all format specs just before `gnus-setup-news-hook' is evaluated. (gnus-setup-news-hook): Default to `gnus-compile'. --- lisp/gnus-start.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 13f3423..5fd167f 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -354,7 +354,7 @@ This hook is called as the first thing when Gnus is started." :group 'gnus-start :type 'hook) -(defcustom gnus-setup-news-hook nil +(defcustom gnus-setup-news-hook '(gnus-compile) "A hook after reading the .newsrc file, but before generating the buffer." :group 'gnus-start :type 'hook) @@ -914,7 +914,12 @@ If LEVEL is non-nil, the news will be set up at level LEVEL." (when (and init gnus-slave) (gnus-dribble-clear)) - (gnus-update-format-specifications) + (gnus-update-format-specifications nil + 'article-mode + 'group + 'group-mode + 'summary + 'summary-mode) ;; See whether we need to read the description file. (when (and (boundp 'gnus-group-line-format) -- 1.7.10.4