(cond ((fboundp 'global-font-lock-mode) ;; I like this one better.. (set-background-color "black") (set-foreground-color "gray70") (set-cursor-color "gray70") (setq font-lock-face-attributes ;; Symbol-for-Face Foreground Background Bold Italic Underline '((font-lock-builtin-face "dark blue") ;; outline level 4 (font-lock-comment-face "firebrick") ;; outline level 5 (font-lock-constant-face "chocolate") (font-lock-function-name-face "turquoise3") ;; outline level 1 (font-lock-highlighting-face "gray") (font-lock-keyword-face "RoyalBlue") ;; outline level 3 (font-lock-reference-face "Medium Purple") (font-lock-string-face "Dark Violet") (font-lock-type-face "seagreen3") (font-lock-variable-name-face "yellow3") ;; outline level 2 (font-lock-warning-face "darkolivegreen") )) ;; Load the font-lock package. (require 'font-lock) ;; Maximum colors (setq font-lock-maximum-decoration t) ;; Turn on font-lock in all modes that support it (global-font-lock-mode t))) ;; Turn on auto-fill for all major modes and make width = 75 (setq-default auto-fill-function 'do-auto-fill) (setq fill-column 120) ; Font lock mode attributes ;(setq font-lock-face-attributes ; (list '(font-lock-comment-face "firebrick"); ; '(font-lock-string-face "blue1" nil nil nil t) ; '(font-lock-emphasized-face nil nil t nil nil) ; '(font-lock-keyword-face "purple") ; '(font-lock-function-name-face "Blue") ; '(font-lock-variable-name-face "DarkGoldenRod") ; '(font-lock-type-face "DarkOliveGreen") ; '(font-lock-reference-face "CadetBlue"))) ; (list '(font-lock-comment-face "dark green") ; '(font-lock-string-face "DarkOrchid3" nil t nil nil) ; '(font-lock-keyword-face "MediumBlue" nil t nil nil) ; '(font-lock-function-name-face "firebrick" nil t nil nil) ; '(font-lock-variable-name-face "Navy" nil t t nil) ; '(font-lock-type-face "dark red" nil t t nil) ; '(font-lock-reference-face "Sienna" nil t nil nil))) ; (list '(font-lock-comment-face "firebrick" nil nil nil nil) ; '(font-lock-string-face "salmon" nil nil nil nil) ; '(font-lock-keyword-face "slateblue1" nil nil nil nil) ; '(font-lock-function-name-face "seagreen3" nil nil nil nil) ; '(font-lock-variable-name-face "khaki4" nil nil nil nil) ; '(font-lock-type-face "purple" nil nil nil nil) ; '(font-lock-reference-face "pink3" nil nil nil nil))) (add-hook 'java-mode-hook 'my-java-mode-hook) (defun my-java-mode-hook () ;;(cond (window-system ;; (require 'andersl-java-font-lock) ;; (turn-on-font-lock))) (setq c-basic-offset 2)) (global-set-key "\C-x\C-m" 'compile)