diff --git a/recursive-narrow.el b/recursive-narrow.el index 2e16625..6248022 100755 --- a/recursive-narrow.el +++ b/recursive-narrow.el @@ -24,7 +24,7 @@ ;; to your .emacs file: ;; ;; (require 'recursive-narrow) -;; +;; (recursive-narrow-mode) ;;; License: @@ -114,9 +114,19 @@ Performs the exact same function but also allows (recenter)) (widen)))) - -(global-set-key (kbd "C-x n w") 'recursive-widen) -(global-set-key (kbd "C-x n n") 'recursive-narrow-or-widen-dwim) +(defvar recursive-narrow-mode-map + (let ((map (make-sparse-keymap))) + (define-key map (kbd " ") #'recursive-narrow-or-widen-dwim) + (define-key map (kbd " ") #'recursive-widen) + map) + "Keymap for `recursive-narrow-mode'.") + +;;;###autoload +(define-minor-mode recursive-narrow-mode + "Enable recursive narrowing." + :global t + :keymap recursive-narrow-mode-map + :lighter " (||)") (provide 'recursive-narrow)