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

The empty regexp matches any string.

(cherry picked from commit 95371fa754260199a6ea3428721270a89c341928)

diff --git a/lisp/emacs-lisp/chart.el b/lisp/emacs-lisp/chart.el
index 2ca9b64be33f0ea7a23f4c832c65bc93429ae311..3acf2588f24ac67a696bd1fb1e43989060def4a8 100644 (file)
--- 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