[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master b95157d: Fix disk-free info in 'insert-directory'
From: |
Eli Zaretskii |
Subject: |
master b95157d: Fix disk-free info in 'insert-directory' |
Date: |
Fri, 17 Sep 2021 03:04:29 -0400 (EDT) |
branch: master
commit b95157de2dcd402185927baf61ce114f554a66e2
Author: John Cummings <john@rootabega.net>
Commit: Eli Zaretskii <eliz@gnu.org>
Fix disk-free info in 'insert-directory'
* lisp/files.el (insert-directory): Call 'get-free-disk-space'
with the argument FILE, to make sure the reported info is for the
correct volume. (Bug#50630)
Copyright-paperwork-exempt: yes
---
lisp/files.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/files.el b/lisp/files.el
index 3a397f8..b113ff3 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -7615,7 +7615,7 @@ normally equivalent short `-D' option is just passed on to
;; 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 ".")))
+ (let ((available (get-free-disk-space file)))
(when available
(end-of-line)
(insert " available " available))))))))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master b95157d: Fix disk-free info in 'insert-directory',
Eli Zaretskii <=