emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/net/newst-reader.el,v


From: Ulf Jasper
Subject: [Emacs-diffs] Changes to emacs/lisp/net/newst-reader.el,v
Date: Sun, 15 Jun 2008 08:04:15 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Ulf Jasper <u11>        08/06/15 08:04:14

Index: net/newst-reader.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/newst-reader.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- net/newst-reader.el 13 Jun 2008 17:42:57 -0000      1.2
+++ net/newst-reader.el 15 Jun 2008 08:04:13 -0000      1.3
@@ -6,7 +6,7 @@
 ;; Author:      Ulf Jasper <address@hidden>
 ;; Filename:    newst-reader.el
 ;; URL:         http://www.nongnu.org/newsticker
-;; Time-stamp:  "13. Juni 2008, 19:28:41 (ulf)"
+;; Time-stamp:  "15. Juni 2008, 09:42:01 (ulf)"
 
 ;; ======================================================================
 
@@ -141,6 +141,34 @@
   :set 'newsticker--set-customvar-formatting
   :group 'newsticker-reader)
 
+(defgroup newsticker-faces nil
+  "Settings for the faces of the feed reader."
+  :group 'newsticker-reader)
+
+(defface newsticker-feed-face
+  '((((class color) (background dark))
+     (:family "helvetica" :bold t :height 1.2 :foreground "misty rose"))
+    (((class color) (background light))
+     (:family "helvetica" :bold t :height 1.2 :foreground "black")))
+  "Face for news feeds."
+  :group 'newsticker-faces)
+
+(defface newsticker-extra-face
+  '((((class color) (background dark))
+     (:italic t :foreground "gray50" :height 0.8))
+    (((class color) (background light))
+     (:italic t :foreground "gray50" :height 0.8)))
+  "Face for newsticker dates."
+  :group 'newsticker-faces)
+
+(defface newsticker-enclosure-face
+  '((((class color) (background dark))
+     (:bold t :background "orange"))
+    (((class color) (background light))
+     (:bold t :background "orange")))
+  "Face for enclosed elements."
+  :group 'newsticker-faces)
+
 ;; ======================================================================
 ;;; Utility functions
 ;; ======================================================================




reply via email to

[Prev in Thread] Current Thread [Next in Thread]