pine-friendly colors with emacs as alternate editor

hi all. i use emacs as my alternate editor, and its font-locking (coloring)
has spoiled me. it's so bad that when i *don't* have it, editing a whole
page of flat, white text makes me feel slightly dumb.

so, i poked around and found u-vm-color.el. it was written for VM, an emacs
MUA, so it's a litle heavyweight...but it colors quoted text and signatures
just like pine's message viewer.

http://de.geocities.com/ulf_jasper/lisp/u-vm-color.el.txt

just put it somewhere in your load-path, e.g. /usr/share/emacs/site-lisp/,
and add this to your ~/.emacs:

   (require 'u-vm-color)

   ; ugly heuristic to font-lock pine emails automatically
   (add-hook 'find-file-hooks
     (lambda ()
       (if (equal "pico." (substring (buffer-name (current-buffer)) 0 5))
           (u-vm-color-fontify-buffer))))

   ; these match pine's defaults. see M-x list-colors-display for other options
   (set-face-foreground 'u-vm-color-citation-1-face "cyan")
   (set-face-foreground 'u-vm-color-citation-2-face "lime green")
   (set-face-foreground 'u-vm-color-citation-3-face "blue")
   (set-face-foreground 'u-vm-color-citation-4-face "dark slate gray")
   (set-face-foreground 'u-vm-color-citation-5-face "dark slate blue")
   (set-face-foreground 'u-vm-color-signature-face  "gray30")

-Ryan

--
http://snarfed.org/
_______________________________________________
Pine-info mailing list
[email protected]
http://mailman1.u.washington.edu/mailman/listinfo/pine-info