Using Emacs Lisp.