mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

(eshell-ls-file): Instead of making the size field in a long-listing

Browse Source 
always 8 characters, use `size-width', which has already been
computed.
This commit is contained in:
John Wiegley 2003-11-16 09:23:49 +00:00
parent 8ceaf12633
commit 5a2e4c34bd
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/eshell/em-ls.el
View File

@ -480,8 +480,8 @@ whose cdr is the list of file attributes."
""))
(let* ((str (eshell-ls-printable-size (nth 7 attrs)))
(len (length str)))
(if (< len 8)
(concat (make-string (- 8 len) ? ) str)
(if (< len size-width)
(concat (make-string (- size-width len) ? ) str)
str))
" " (format-time-string
(concat