/[emacs]/emacs/lisp/progmodes/compile.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/compile.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.359 by jurta, Mon Jun 6 12:27:44 2005 UTC revision 1.360 by miles, Fri Jun 10 07:34:16 2005 UTC
# Line 468  starting the compilation process.") Line 468  starting the compilation process.")
468  ;; History of compile commands.  ;; History of compile commands.
469  (defvar compile-history nil)  (defvar compile-history nil)
470    
471  (defface compilation-warning-face  (defface compilation-warning
472    '((((class color) (min-colors 16)) (:foreground "Orange" :weight bold))    '((((class color) (min-colors 16)) (:foreground "Orange" :weight bold))
473      (((class color)) (:foreground "cyan" :weight bold))      (((class color)) (:foreground "cyan" :weight bold))
474      (t (:weight bold)))      (t (:weight bold)))
475    "Face used to highlight compiler warnings."    "Face used to highlight compiler warnings."
476    :group 'font-lock-highlighting-faces    :group 'font-lock-highlighting-faces
477    :version "22.1")    :version "22.1")
478    ;; backward-compatibility alias
479    (put 'compilation-warning-face 'face-alias 'compilation-warning)
480    
481  (defface compilation-info-face  (defface compilation-info
482    '((((class color) (min-colors 16) (background light))    '((((class color) (min-colors 16) (background light))
483       (:foreground "Green3" :weight bold))       (:foreground "Green3" :weight bold))
484      (((class color) (min-colors 88) (background dark))      (((class color) (min-colors 88) (background dark))
# Line 488  starting the compilation process.") Line 490  starting the compilation process.")
490    "Face used to highlight compiler warnings."    "Face used to highlight compiler warnings."
491    :group 'font-lock-highlighting-faces    :group 'font-lock-highlighting-faces
492    :version "22.1")    :version "22.1")
493    ;; backward-compatibility alias
494    (put 'compilation-info-face 'face-alias 'compilation-info)
495    
496  (defvar compilation-message-face nil  (defvar compilation-message-face nil
497    "Face name to use for whole messages.    "Face name to use for whole messages.
# Line 498  Faces `compilation-error-face', `compila Line 502  Faces `compilation-error-face', `compila
502  (defvar compilation-error-face 'font-lock-warning-face  (defvar compilation-error-face 'font-lock-warning-face
503    "Face name to use for file name in error messages.")    "Face name to use for file name in error messages.")
504    
505  (defvar compilation-warning-face 'compilation-warning-face  (defvar compilation-warning-face 'compilation-warning
506    "Face name to use for file name in warning messages.")    "Face name to use for file name in warning messages.")
507    
508  (defvar compilation-info-face 'compilation-info-face  (defvar compilation-info-face 'compilation-info
509    "Face name to use for file name in informational messages.")    "Face name to use for file name in informational messages.")
510    
511  (defvar compilation-line-face 'font-lock-variable-name-face  (defvar compilation-line-face 'font-lock-variable-name-face

Legend:
Removed from v.1.359  
changed lines
  Added in v.1.360

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26