[elpa] master c1351b0 19/22: Collect files only when diff-hl-dired-extra-indicators is non-nil

[Dmitry Gutov]

branch: master
commit c1351b0f1f59a88d7dd6a84c9233a2e5cdda183e
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    Collect files only when diff-hl-dired-extra-indicators is non-nil
---
 diff-hl-dired.el |    7 +++----
 1 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/diff-hl-dired.el b/diff-hl-dired.el
index c9097ee..8790f56 100644
--- a/diff-hl-dired.el
+++ b/diff-hl-dired.el
@@ -82,9 +82,6 @@
   (let ((backend (ignore-errors (vc-responsible-backend default-directory)))
         (def-dir default-directory)
         (buffer (current-buffer))
-        (contents (cl-loop for file in (directory-files default-directory)
-                           unless (member file '("." ".." ".hg"))
-                           collect file))
         dirs-alist files-alist)
     (when backend
       (diff-hl-dired-clear)
@@ -99,7 +96,9 @@
         (vc-call-backend
          backend 'dir-status-files def-dir
          (when diff-hl-dired-extra-indicators
-           contents)
+           (cl-loop for file in (directory-files def-dir)
+                    unless (member file '("." ".." ".hg"))
+                    collect file))
          nil
          (lambda (entries &optional more-to-come)
            (when (buffer-live-p buffer)