From: Christopher Schmidt <christopher@ch.ristopher.com>
Date: Sat, 23 Nov 2019 14:45:56 +0000 (+0100)
Subject: Always expand "total" in dired
X-Git-Tag: emacs-27.0.90~542
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b9e99ab5ac49f8cb03fc1c27eb830a24e9bdf83c;p=emacs.git

Always expand "total" in dired

* lisp/files.el (insert-directory): Always replace "total" with
"total used in directory", even when we don't have free disk space
(bug#13191).  This makes the display more consistent.
---

diff --git a/lisp/files.el b/lisp/files.el
index 2c45a8b1078..a384e7136e8 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -7153,10 +7153,11 @@ normally equivalent short `-D' option is just passed on to
 		(goto-char beg)
 		;; First find the line to put it on.
 		(when (re-search-forward "^ *\\(total\\)" nil t)
+		  ;; Replace "total" with "total used in directory" to
+		  ;; avoid confusion.
+		  (replace-match "total used in directory" nil nil nil 1)
 		  (let ((available (get-free-disk-space ".")))
 		    (when available
-		      ;; Replace "total" with "used", to avoid confusion.
-		      (replace-match "total used in directory" nil nil nil 1)
 		      (end-of-line)
 		      (insert " available " available))))))))))