(gnus-article-truncate-lines): Use `truncate-lines'.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 5a0b435ead80489bdd18acad82016870790f97d2..f2c2b7d8e95d3e9aff9ee8081c2f6eaff3dbdd05 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,7 @@
 2007-11-22  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * gnus-art.el (gnus-article-truncate-lines): Use `truncate-lines'.
+
        * message.el (message-send-mail-function): Fix error convention.
        (message-mailer-swallows-blank-line, message-send-mail-with-sendmail)
        (message-widen-reply, message-send-mail, message-talkative-question)

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 3897f355b2977d434e469f83fa6e63886341114d..4b93c030ac7e1ff4368be83a2605a3b86d7c077b 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -2222,7 +2222,7 @@ unfolded."
        (mail-header-fold-field)
        (goto-char (point-max))))))
 
-(defcustom gnus-article-truncate-lines default-truncate-lines
+(defcustom gnus-article-truncate-lines (default-value 'truncate-lines)
   "Value of `truncate-lines' in Gnus Article buffer.
 Valid values are nil, t, `head', `first', `last', an integer or a
 predicate.  See Info node `(gnus)Customizing Articles'."