comparison lisp/reveal.el @ 60487:bf372b4b92e9

(reveal-mode-map): Bind C-a to beginning-of-line.

60486:47a57ff1da21

		 (overlay-put ol 'invisible inv))))))))
   (error (message "Reveal: %s" err)))))

(defvar reveal-mode-map
  (let ((map (make-sparse-keymap)))
    ;; Override the default move-end-of-line which skips valuable
    ;; invisible text.
    (define-key map [?\C-e] 'end-of-line)
    map))

;;;###autoload
(define-minor-mode reveal-mode

60487:bf372b4b92e9

		 (overlay-put ol 'invisible inv))))))))
   (error (message "Reveal: %s" err)))))

(defvar reveal-mode-map
  (let ((map (make-sparse-keymap)))
    ;; Override the default move-beginning-of-line and move-end-of-line
    ;; which skips valuable invisible text.
    (define-key map [?\C-a] 'beginning-of-line)
    (define-key map [?\C-e] 'end-of-line)
    map))

;;;###autoload
(define-minor-mode reveal-mode