procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; * lisp/emacs-lisp/chart.el (chart--directory-size): Simpler regexp

Browse source 
The empty regexp matches any string.
This commit is contained in:
Mattias Engdegård 2024-09-07 16:05:07 +02:00
parent 9a1de38528
commit 95371fa754
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/chart.el
View file

@ -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