emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] Changes to emacs/lisp/progmodes/vhdl-mode.el


From: Dan Nicolaescu
Subject: [Emacs-diffs] Changes to emacs/lisp/progmodes/vhdl-mode.el
Date: Fri, 02 Sep 2005 12:59:59 -0400

Index: emacs/lisp/progmodes/vhdl-mode.el
diff -c emacs/lisp/progmodes/vhdl-mode.el:1.43 
emacs/lisp/progmodes/vhdl-mode.el:1.44
*** emacs/lisp/progmodes/vhdl-mode.el:1.43      Wed Aug 31 19:53:52 2005
--- emacs/lisp/progmodes/vhdl-mode.el   Fri Sep  2 16:59:57 2005
***************
*** 12823,12831 ****
   'vhdl-highlight-faces 'font-lock-variable-name-face 'custom-face)
  
  (defface vhdl-font-lock-prompt-face
!   '((((class color) (background light)) (:foreground "Red" :bold t))
!     (((min-colors 88) (class color) (background light))
       (:foreground "Red1" :bold t))
      (((class color) (background dark)) (:foreground "Pink" :bold t))
      (t (:inverse-video t)))
    "Font lock mode face used to highlight prompts."
--- 12823,12831 ----
   'vhdl-highlight-faces 'font-lock-variable-name-face 'custom-face)
  
  (defface vhdl-font-lock-prompt-face
!   '((((min-colors 88) (class color) (background light))
       (:foreground "Red1" :bold t))
+     (((class color) (background light)) (:foreground "Red" :bold t))
      (((class color) (background dark)) (:foreground "Pink" :bold t))
      (t (:inverse-video t)))
    "Font lock mode face used to highlight prompts."
***************
*** 15289,15296 ****
    :group 'speedbar-faces)
  
  (defface vhdl-speedbar-architecture-face
!   '((((class color) (background light)) (:foreground "Blue"))
!     (((min-colors 88) (class color) (background light)) (:foreground "Blue1"))
      (((class color) (background dark)) (:foreground "LightSkyBlue")))
    "Face used for displaying architecture names."
    :group 'speedbar-faces)
--- 15289,15297 ----
    :group 'speedbar-faces)
  
  (defface vhdl-speedbar-architecture-face
!   '((((min-colors 88) (class color) (background light)) (:foreground "Blue1"))
!     (((class color) (background light)) (:foreground "Blue"))
!     
      (((class color) (background dark)) (:foreground "LightSkyBlue")))
    "Face used for displaying architecture names."
    :group 'speedbar-faces)
***************
*** 15333,15340 ****
    :group 'speedbar-faces)
  
  (defface vhdl-speedbar-architecture-selected-face
!   '((((class color) (background light)) (:foreground "Blue" :underline t))
!     (((min-colors 88) (class color) (background light)) (:foreground "Blue1" 
:underline t))
      (((class color) (background dark)) (:foreground "LightSkyBlue" :underline 
t)))
    "Face used for displaying architecture names."
    :group 'speedbar-faces)
--- 15334,15342 ----
    :group 'speedbar-faces)
  
  (defface vhdl-speedbar-architecture-selected-face
!   '((((min-colors 88) (class color) (background light)) (:foreground
!   "Blue1" :underline t))
!     (((class color) (background light)) (:foreground "Blue" :underline t))
      (((class color) (background dark)) (:foreground "LightSkyBlue" :underline 
t)))
    "Face used for displaying architecture names."
    :group 'speedbar-faces)




reply via email to

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