branch: externals/disk-usage
commit 0fff6a89c6e90d9526ace4aad4e815b863b7315c
Author: Pierre Neidhardt <[email protected]>
Commit: Pierre Neidhardt <[email protected]>

    Fix 'nil' children issue on inaccessible directories
---
 disk-usage.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/disk-usage.el b/disk-usage.el
index b035aeb..39d5a25 100644
--- a/disk-usage.el
+++ b/disk-usage.el
@@ -156,7 +156,9 @@
                  (disk-usage--file-info-make
                   :name path
                   :size (disk-usage--directory-size path)
-                  :children (- (length (directory-files path)) 2)))
+                  :children (if (file-accessible-directory-p path)
+                                (- (length (directory-files path)) 2)
+                              0)))
         (list (disk-usage--file-info-make :size 0 :name directory)))))
 
 (defun disk-usage--list-recursively (directory)

Reply via email to