Emacs: Consider underscore part of word