(gnus-print-buffer): Honor ps-print-color-p.

Suggested by <chris.anderton@zetnet.co.uk>.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index f5c7a68a715..ca1a4a01ecb 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2008-03-05  Reiner Steib  <Reiner.Steib@gmx.de>
+
+        * gnus-sum.el (gnus-print-buffer): Honor ps-print-color-p.
+        Suggested by <chris.anderton@zetnet.co.uk>.
+
 2008-02-29  Andreas Seltenreich  <andreas@gate450.dyndns.org>
 
         * nnweb.el (nnweb-google-parse-1): Fix date parsing on articles with
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index f5544bb7fd3..269da70461a 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -8909,7 +8909,7 @@ to save in."
                           (mail-header-date gnus-current-headers) ")"))))
             (gnus-run-hooks 'gnus-ps-print-hook)
             (save-excursion
-              (if window-system
+              (if ps-print-color-p
                   (ps-spool-buffer-with-faces)
                 (ps-spool-buffer)))))
       (kill-buffer buffer))))