Emacs function to increment numbers