A visual zap-to-char command for emacs