master 4fb098ae3fa: vc-dir-maybe-narrow-and-show-more-button: Affect only VC-Dir buffers

branch: master
commit 4fb098ae3fa1ffa721214555b149d94caecc8d0c
Author: Sean Whitton <[email protected]>
Commit: Sean Whitton <[email protected]>

    vc-dir-maybe-narrow-and-show-more-button: Affect only VC-Dir buffers
    
    * lisp/vc/vc-dir.el (vc-dir-maybe-narrow-and-show-more-button):
    Do nothing if vc-parent-buffer is not in vc-dir-mode.
---
 lisp/vc/vc-dir.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index d75dce77493..d0711da91c8 100644
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -1801,7 +1801,10 @@ to process exceeds a non-nil `vc-dir-process-output-limit'."
 TEXT is passed on to `vc-dir-show-more-button'.
 Called by VC backend `dir-status-files' implementations."
   (when (and (natnump vc-dir-process-output-limit)
-             (> (buffer-size) vc-dir-process-output-limit))
+             (> (buffer-size) vc-dir-process-output-limit)
+             vc-parent-buffer
+             (with-current-buffer vc-parent-buffer
+               (derived-mode-p 'vc-dir-mode)))
     (narrow-to-region (point-min)
                       (save-excursion
                         (goto-char (+ (point-min)