Miscellaneous emacs-lisp code.