Index: emacs/lisp/gnus/sieve-mode.el
diff -c emacs/lisp/gnus/sieve-mode.el:1.2 emacs/lisp/gnus/sieve-mode.el:1.3
*** emacs/lisp/gnus/sieve-mode.el:1.2 Sat Sep 4 13:13:43 2004
--- emacs/lisp/gnus/sieve-mode.el Thu May 26 15:03:29 2005
***************
*** 1,5 ****
;;; sieve-mode.el --- Sieve code editing commands for Emacs
! ;; Copyright (C) 2001, 2003 Free Software Foundation, Inc.
;; Author: Simon Josefsson <[EMAIL PROTECTED]>
--- 1,5 ----
;;; sieve-mode.el --- Sieve code editing commands for Emacs
! ;; Copyright (C) 2001, 2002, 2003, 2005 Free Software Foundation, Inc.
;; Author: Simon Josefsson <[EMAIL PROTECTED]>
***************
*** 75,81 ****
(((class color) (background light)) (:foreground "Orchid"))
(((class color) (background dark)) (:foreground "LightSteelBlue"))
(t (:bold t)))
! "Face used for Sieve Control Commands.")
(defvar sieve-action-commands-face 'sieve-action-commands-face
"Face name used for Sieve Action Commands.")
--- 75,82 ----
(((class color) (background light)) (:foreground "Orchid"))
(((class color) (background dark)) (:foreground "LightSteelBlue"))
(t (:bold t)))
! "Face used for Sieve Control Commands."
! :group 'sieve)
(defvar sieve-action-commands-face 'sieve-action-commands-face
"Face name used for Sieve Action Commands.")
***************
*** 85,91 ****
(((class color) (background light)) (:foreground "Blue"))
(((class color) (background dark)) (:foreground "LightSkyBlue"))
(t (:inverse-video t :bold t)))
! "Face used for Sieve Action Commands.")
(defvar sieve-test-commands-face 'sieve-test-commands-face
"Face name used for Sieve Test Commands.")
--- 86,93 ----
(((class color) (background light)) (:foreground "Blue"))
(((class color) (background dark)) (:foreground "LightSkyBlue"))
(t (:inverse-video t :bold t)))
! "Face used for Sieve Action Commands."
! :group 'sieve)
(defvar sieve-test-commands-face 'sieve-test-commands-face
"Face name used for Sieve Test Commands.")
***************
*** 99,105 ****
(((class color) (background light)) (:foreground "CadetBlue"))
(((class color) (background dark)) (:foreground "Aquamarine"))
(t (:bold t :underline t)))
! "Face used for Sieve Test Commands.")
(defvar sieve-tagged-arguments-face 'sieve-tagged-arguments-face
"Face name used for Sieve Tagged Arguments.")
--- 101,108 ----
(((class color) (background light)) (:foreground "CadetBlue"))
(((class color) (background dark)) (:foreground "Aquamarine"))
(t (:bold t :underline t)))
! "Face used for Sieve Test Commands."
! :group 'sieve)
(defvar sieve-tagged-arguments-face 'sieve-tagged-arguments-face
"Face name used for Sieve Tagged Arguments.")
***************
*** 111,117 ****
(((class color) (background light)) (:foreground "Purple"))
(((class color) (background dark)) (:foreground "Cyan"))
(t (:bold t)))
! "Face used for Sieve Tagged Arguments.")
(defconst sieve-font-lock-keywords
--- 114,121 ----
(((class color) (background light)) (:foreground "Purple"))
(((class color) (background dark)) (:foreground "Cyan"))
(t (:bold t)))
! "Face used for Sieve Tagged Arguments."
! :group 'sieve)
(defconst sieve-font-lock-keywords
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
