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

[Richard M. Stallman]

Index: emacs/lisp/progmodes/vhdl-mode.el
diff -c emacs/lisp/progmodes/vhdl-mode.el:1.13 
emacs/lisp/progmodes/vhdl-mode.el:1.14
*** emacs/lisp/progmodes/vhdl-mode.el:1.13      Sun Dec 30 17:14:41 2001
--- emacs/lisp/progmodes/vhdl-mode.el   Mon Dec 31 15:43:36 2001
***************
*** 9424,9431 ****
   'vhdl-highlight-faces 'font-lock-variable-name-face 'custom-face)
  
  (defface vhdl-font-lock-prompt-face
!   '((((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."
    :group 'vhdl-highlight-faces
--- 9424,9431 ----
   'vhdl-highlight-faces 'font-lock-variable-name-face 'custom-face)
  
  (defface vhdl-font-lock-prompt-face
!   '((((class color) (background light)) (:foreground "Red" :weight bold))
!     (((class color) (background dark)) (:foreground "Pink" :weight bold))
      (t (:inverse-video t)))
    "Font lock mode face used to highlight prompts."
    :group 'vhdl-highlight-faces
***************
*** 9434,9440 ****
  (defface vhdl-font-lock-attribute-face
    '((((class color) (background light)) (:foreground "Orchid"))
      (((class color) (background dark)) (:foreground "LightSteelBlue"))
!     (t (:italic t :bold t)))
    "Font lock mode face used to highlight standardized attributes."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
--- 9434,9440 ----
  (defface vhdl-font-lock-attribute-face
    '((((class color) (background light)) (:foreground "Orchid"))
      (((class color) (background dark)) (:foreground "LightSteelBlue"))
!     (t (:slant italic :weight bold)))
    "Font lock mode face used to highlight standardized attributes."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
***************
*** 9442,9448 ****
  (defface vhdl-font-lock-enumvalue-face
    '((((class color) (background light)) (:foreground "Gold4"))
      (((class color) (background dark)) (:foreground "BurlyWood"))
!     (t (:italic t :bold t)))
    "Font lock mode face used to highlight standardized enumeration values."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
--- 9442,9448 ----
  (defface vhdl-font-lock-enumvalue-face
    '((((class color) (background light)) (:foreground "Gold4"))
      (((class color) (background dark)) (:foreground "BurlyWood"))
!     (t (:slant italic :weight bold)))
    "Font lock mode face used to highlight standardized enumeration values."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
***************
*** 9450,9456 ****
  (defface vhdl-font-lock-function-face
    '((((class color) (background light)) (:foreground "Orchid4"))
      (((class color) (background dark)) (:foreground "Orchid1"))
!     (t (:italic t :bold t)))
    "Font lock mode face used to highlight standardized functions and packages."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
--- 9450,9456 ----
  (defface vhdl-font-lock-function-face
    '((((class color) (background light)) (:foreground "Orchid4"))
      (((class color) (background dark)) (:foreground "Orchid1"))
!     (t (:slant italic :weight bold)))
    "Font lock mode face used to highlight standardized functions and packages."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
***************
*** 9458,9471 ****
  (defface vhdl-font-lock-directive-face
    '((((class color) (background light)) (:foreground "CadetBlue"))
      (((class color) (background dark)) (:foreground "Aquamarine"))
!     (t (:italic t :bold t)))
    "Font lock mode face used to highlight directives."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
  
  (defface vhdl-font-lock-reserved-words-face
!   '((((class color) (background light)) (:foreground "Orange" :bold t))
!     (((class color) (background dark)) (:foreground "Yellow" :bold t))
      (t ()))
    "Font lock mode face used to highlight additional reserved words."
    :group 'vhdl-highlight-faces
--- 9458,9471 ----
  (defface vhdl-font-lock-directive-face
    '((((class color) (background light)) (:foreground "CadetBlue"))
      (((class color) (background dark)) (:foreground "Aquamarine"))
!     (t (:slant italic :weight bold)))
    "Font lock mode face used to highlight directives."
    :group 'vhdl-highlight-faces
    :group 'font-lock-highlighting-faces)
  
  (defface vhdl-font-lock-reserved-words-face
!   '((((class color) (background light)) (:foreground "Orange" :weight bold))
!     (((class color) (background dark)) (:foreground "Yellow" :weight bold))
      (t ()))
    "Font lock mode face used to highlight additional reserved words."
    :group 'vhdl-highlight-faces