Emacs: bar cursor