Add g-/g= keys for buffer narrowing/widening
This commit is contained in:
parent
f20cfd21c2
commit
fe425c005e
3 changed files with 6 additions and 3 deletions
|
@ -238,8 +238,9 @@ clone the buffer and hard-narrow the selection. If mark isn't active, then widen
|
||||||
the buffer (if narrowed).
|
the buffer (if narrowed).
|
||||||
|
|
||||||
Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
|
Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
|
||||||
(interactive "r")
|
(interactive "rP")
|
||||||
(cond ((region-active-p)
|
(cond ((or (region-active-p)
|
||||||
|
(and beg end))
|
||||||
(deactivate-mark)
|
(deactivate-mark)
|
||||||
(when clone-p
|
(when clone-p
|
||||||
(let ((old-buf (current-buffer)))
|
(let ((old-buf (current-buffer)))
|
||||||
|
|
|
@ -97,6 +97,8 @@
|
||||||
:n "gr" #'+eval:region
|
:n "gr" #'+eval:region
|
||||||
:n "gR" #'+eval/buffer
|
:n "gR" #'+eval/buffer
|
||||||
:v "gR" #'+eval:replace-region
|
:v "gR" #'+eval:replace-region
|
||||||
|
:nv "g-" #'+evil:narrow-buffer
|
||||||
|
:n "g=" #'widen
|
||||||
:v "@" #'+evil:apply-macro
|
:v "@" #'+evil:apply-macro
|
||||||
:n "g@" #'+evil:apply-macro
|
:n "g@" #'+evil:apply-macro
|
||||||
;; repeat in visual mode (FIXME buggy)
|
;; repeat in visual mode (FIXME buggy)
|
||||||
|
|
|
@ -149,7 +149,7 @@ integration."
|
||||||
(doom/retab beg end))
|
(doom/retab beg end))
|
||||||
|
|
||||||
;;;###autoload (autoload '+evil:narrow-buffer "feature/evil/autoload/evil" nil t)
|
;;;###autoload (autoload '+evil:narrow-buffer "feature/evil/autoload/evil" nil t)
|
||||||
(evil-define-command +evil:narrow-buffer (beg end &optional bang)
|
(evil-define-operator +evil:narrow-buffer (beg end &optional bang)
|
||||||
"Wrapper around `doom/clone-and-narrow-buffer'."
|
"Wrapper around `doom/clone-and-narrow-buffer'."
|
||||||
:move-point nil
|
:move-point nil
|
||||||
(interactive "<r><!>")
|
(interactive "<r><!>")
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue