Synch with Oort Gnus.

[elisp/gnus.git-] / lisp / gnus.el

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 675d388..acaf2ed 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -667,18 +667,30 @@ be set in `.emacs' instead."
   "Face used for normal interest ancient articles.")
 
 (defface gnus-summary-high-uncached-face
-  '((((class color))
-     (:bold t :background "Wheat1")))
+   '((((class color)
+       (background light))
+      (:bold t :foreground "cyan4" :bold nil))
+     (((class color) (background dark))
+      (:bold t :foreground "LightGray" :bold nil))
+     (t (:inverse-video t :bold t)))
   "Face used for high interest uncached articles.")
 
 (defface gnus-summary-low-uncached-face
-  '((((class color))
-     (:italic t :background "Wheat1")))
+   '((((class color)
+       (background light))
+      (:italic t :foreground "cyan4" :bold nil))
+     (((class color) (background dark))
+      (:italic t :foreground "LightGray" :bold nil))
+     (t (:inverse-video t :italic t)))
   "Face used for low interest uncached articles.")
 
 (defface gnus-summary-normal-uncached-face
-  '((((class color))
-     (:background "Wheat1")))
+   '((((class color)
+       (background light))
+      (:foreground "cyan4" :bold nil))
+     (((class color) (background dark))
+      (:foreground "LightGray" :bold nil))
+     (t (:inverse-video t)))
   "Face used for normal interest uncached articles.")
 
 (defface gnus-summary-high-unread-face
@@ -1422,7 +1434,7 @@ cache to the full extent of the law."
   :group 'gnus-meta
   :type 'boolean)
 
-(defcustom gnus-keep-backlog nil
+(defcustom gnus-keep-backlog 20
   "*If non-nil, Gnus will keep read articles for later re-retrieval.
 If it is a number N, then Gnus will only keep the last N articles
 read.  If it is neither nil nor a number, Gnus will keep all read