shorten emacs text-mode name string