Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
7ad0c1c3
Commit
7ad0c1c3
authored
Dec 30, 2001
by
Eli Zaretskii
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(insert-directory): Modify the "total" line wording, in accordance with
files.el's insert-directory.
parent
34ef66ac
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
2 deletions
+7
-2
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/ls-lisp.el
lisp/ls-lisp.el
+2
-2
No files found.
lisp/ChangeLog
View file @
7ad0c1c3
2001-12-30 Eli Zaretskii <eliz@is.elta.co.il>
* ls-lisp.el (insert-directory): Modify the "total" line wording,
in accordance with files.el's insert-directory.
2001-12-29 Richard M. Stallman <rms@gnu.org>
* files.el (basic-save-buffer): If a before-write hook displays
...
...
lisp/ls-lisp.el
View file @
7ad0c1c3
...
...
@@ -208,8 +208,8 @@ that work are: A a c i r S s t u U X g G B C R and F partly."
(
when
(
re-search-forward
"^total"
nil
t
)
(
let
((
available
(
get-free-disk-space
"."
)))
(
when
available
;; Replace "total" with "used", to avoid confusion.
(
replace-match
"
used
"
)
;; Replace "total" with "
total
used", to avoid confusion.
(
replace-match
"
total used in directory
"
)
(
end-of-line
)
(
insert
" available "
available
)))))))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment