Emacs init and utility functions I've found