Custom settings for emacs

This web page gives an example configuration file for emacs 21.  Its main purpose is to provide a colour scheme with bright colours on a black background.  The font-lock mode is used for colour highlighting where possible; latex-mode uses hilit19.  It also suppresses the startup message, sets the fill-column to 77 characters, and turns off the toolbar.

;; Description: Configuration file for emacs 21
;; Author:      (c) Christopher D. Latham, 16th July 2002
;; URL:         http://newton.ex.ac.uk/people/latham/Emacs/
(setq inhibit-startup-message t)
(set-variable 'fill-column 77)
(tool-bar-mode -1)
(setq default-frame-alist
      '((background-mode . dark)
        (cursor-color . "yellow"
        (foreground-color . "white")
        (background-color . "black")))
(setq auto-mode-alist (cons '("\\.html$" . html-helper-mode) auto-mode-alist))
(cond (window-system
	(setq hilit-mode-enable-list '(latex-mode)
               hilit-background-mode 'dark)
        (require 'hilit19)
        (setq hilit-auto-highlight-maxout 1048576)))
(cond ((fboundp 'global-font-lock-mode)
        (setq font-lock-face-attributes
;; Symbol-for-Face Foreground Background Bold Italic Underline
              '((font-lock-builtin-face       "pink" nil t nil nil)
                (font-lock-comment-face       "pale green")
                (font-lock-constant-face      "yellow")
                (font-lock-doc-face           "lawn green")
                (font-lock-function-name-face "medium turquoise" nil t nil nil)
                (font-lock-keyword-face       "aquamarine" nil t nil nil)
                (font-lock-string-face        "sky blue")
                (font-lock-type-face          "orange" nil t nil nil)
                (font-lock-variable-name-face "dodger blue")
                (font-lock-warning-face       "red" nil t nil nil)))
       (require 'font-lock)
       (setq font-lock-maximum-decoration t)
       (global-font-lock-mode t)))
(autoload 'html-helper-mode "html-helper-mode" "Yay HTML" t)