[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 95371fa7542 2/4: ; * lisp/emacs-lisp/chart.el (chart--directory-s
From: |
Mattias Engdegård |
Subject: |
master 95371fa7542 2/4: ; * lisp/emacs-lisp/chart.el (chart--directory-size): Simpler regexp |
Date: |
Mon, 9 Sep 2024 04:42:28 -0400 (EDT) |
branch: master
commit 95371fa754260199a6ea3428721270a89c341928
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
; * lisp/emacs-lisp/chart.el (chart--directory-size): Simpler regexp
The empty regexp matches any string.
---
lisp/emacs-lisp/chart.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/chart.el b/lisp/emacs-lisp/chart.el
index 2ca9b64be33..3acf2588f24 100644
--- a/lisp/emacs-lisp/chart.el
+++ b/lisp/emacs-lisp/chart.el
@@ -649,7 +649,7 @@ SORT-PRED if desired."
"Compute total size of files in directory DIR and its subdirectories.
DIR is assumed to be a directory, verified by the caller."
(let ((size 0))
- (dolist (file (directory-files-recursively dir "." t))
+ (dolist (file (directory-files-recursively dir "" t))
(let ((fsize (nth 7 (file-attributes file))))
(if (> fsize 0)
(setq size