diff options
| -rw-r--r-- | lisp/files.el | 5 |
1 files changed, 3 insertions, 2 deletions
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)))))))))) |