Change behavior of BANG for +evil:narrow-buffer
BANG = use indirect buffers, otherwise, narrow/widen the current buffer.
This commit is contained in:
parent
f7c368c5da
commit
ab8b31e5bc
1 changed files with 9 additions and 3 deletions
|
@ -135,11 +135,17 @@ integration."
|
||||||
|
|
||||||
;;;###autoload (autoload '+evil:narrow-buffer "editor/evil/autoload/evil" nil t)
|
;;;###autoload (autoload '+evil:narrow-buffer "editor/evil/autoload/evil" nil t)
|
||||||
(evil-define-operator +evil:narrow-buffer (beg end &optional bang)
|
(evil-define-operator +evil:narrow-buffer (beg end &optional bang)
|
||||||
"Wrapper around `doom/clone-and-narrow-buffer'."
|
"Narrow the buffer to region between BEG and END.
|
||||||
|
|
||||||
|
Widens narrowed buffers first. If BANG, use indirect buffer clones instead."
|
||||||
:move-point nil
|
:move-point nil
|
||||||
(interactive "<r><!>")
|
(interactive "<r><!>")
|
||||||
(if bang
|
(if (not bang)
|
||||||
(doom/widen-indirectly-narrowed-buffer bang)
|
(if (buffer-narrowed-p)
|
||||||
|
(widen)
|
||||||
|
(narrow-to-region beg end))
|
||||||
|
(when (buffer-narrowed-p)
|
||||||
|
(doom/widen-indirectly-narrowed-buffer t))
|
||||||
(doom/narrow-buffer-indirectly beg end)))
|
(doom/narrow-buffer-indirectly beg end)))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue