[jabber.el] Chat printer for HTML

[Phil G. <pg...@gm...>]

The emacs-jabber documentation, as posted on the project website[1],
says the following of chat body printers:

> Body printers are a subgroup of chat printers. They are exclusive;
> only one of them applies to any given message. The idea is that
> "higher-quality" parts of the message override pieces included for
> backwards compatibility. Included are jabber-muc-print-invite and
> jabber-chat-normal-body; functions for XHTML-IM and PGP encrypted
> messages may be written in the future.

The attached function renders XHTML messages more readably in Emacs
using shr. (It was nice to see how easy this is now with just Emacs core
packages.)

I had only one source of HTML-formatted messages for testing, so there
may be other ways of formatting the message that I missed. However, this
seems like the 80% solution, at least. I hope it can be included in
emacs-jabber. If not, perhaps others will find it helpful.

As for the PGP printer: Good luck. :)

phil

[1] http://emacs-jabber.sourceforge.net/manual-0.8.0/Chat-printers.html