My first piece of elisp code.