From ab8b31e5bc2436892ea022cc485724ad90c232f4 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 14 Sep 2019 18:32:14 -0400 Subject: [PATCH] Change behavior of BANG for +evil:narrow-buffer BANG = use indirect buffers, otherwise, narrow/widen the current buffer. --- modules/editor/evil/autoload/evil.el | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/modules/editor/evil/autoload/evil.el b/modules/editor/evil/autoload/evil.el index be19c9058..27cd05dcb 100644 --- a/modules/editor/evil/autoload/evil.el +++ b/modules/editor/evil/autoload/evil.el @@ -135,11 +135,17 @@ integration." ;;;###autoload (autoload '+evil:narrow-buffer "editor/evil/autoload/evil" nil t) (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 (interactive "") - (if bang - (doom/widen-indirectly-narrowed-buffer bang) + (if (not 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))) ;;;###autoload