Enable gnus-treat-fold-headers by default

* lisp/gnus/gnus-art.el (gnus-treat-fold-headers): Change default
to `head'.

2 files changed, 5 insertions, 2 deletions

diff --git a/etc/NEWS b/etc/NEWS
index d786d17f21e..352d1896129 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -374,6 +374,9 @@ following in your .gnus file:
   (set-face-attribute 'gnus-header nil :inherit 'unspecified)
 
 ---
+*** The default value of 'gnus-treat-fold-headers' is now 'head'.
+
+---
 *** New face 'gnus-header'.
 All other 'gnus-header-*' faces inherit from this face now.
 
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 8b2b7ade294..554381e2120 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -1383,11 +1383,11 @@ This variable has no effect if `gnus-treat-unfold-headers' is nil."
                  (const :tag "all" t)
                  (regexp)))
 
-(defcustom gnus-treat-fold-headers nil
+(defcustom gnus-treat-fold-headers 'head
   "Fold headers.
 Valid values are nil, t, `head', `first', `last', an integer or a
 predicate.  See Info node `(gnus)Customizing Articles'."
-  :version "22.1"
+  :version "29.1"
   :group 'gnus-article-treat
   :link '(custom-manual "(gnus)Customizing Articles")
   :type gnus-article-treat-custom)