;; try:
;;     emacs -nw -Q -l captain-mr-king.el captain-mr-king.el

(font-lock-add-keywords 'emacs-lisp-mode
  '(
    ("font-lock-builtin-face"              .  font-lock-builtin-face)
    ("font-lock-comment-delimiter-face"    .  font-lock-comment-delimiter-face)
    ("font-lock-comment-face"              .  font-lock-comment-face)
    ("font-lock-constant-face"             .  font-lock-constant-face)
    ("font-lock-doc-face"                  .  font-lock-doc-face)
    ("font-lock-function-name-face"        .  font-lock-function-name-face)
    ("font-lock-keyword-face"              .  font-lock-keyword-face)
    ("font-lock-negation-char-face"        .  font-lock-negation-char-face)
    ("font-lock-preprocessor-face"         .  font-lock-preprocessor-face)
    ("font-lock-reference-face"            .  font-lock-reference-face)
    ("font-lock-string-face"               .  font-lock-string-face)
    ("font-lock-syntactic-face-function"   .  font-lock-syntactic-face-function)
    ("font-lock-type-face"                 .  font-lock-type-face)
    ("font-lock-variable-name-face"        .  font-lock-variable-name-face)
    ("font-lock-warning-face"              .  font-lock-warning-face)
    ("font-lock-regexp-grouping-construct" . 'font-lock-regexp-grouping-construct)
    ("font-lock-regexp-grouping-backslash" . 'font-lock-regexp-grouping-backslash)
    )
  t) ; HOW (append to highlighting list, i.e., keep old)