aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii1999-03-04 11:34:47 +0000
committerEli Zaretskii1999-03-04 11:34:47 +0000
commite4a225a97d066b069417d4e0f0e382ca63eb51e0 (patch)
tree18e7292316a4ddd00ec87fb9790e28a0b9aa2716
parentdf6efcb120b60fcda1ca1faaead4d80b37d0cb7f (diff)
downloademacs-e4a225a97d066b069417d4e0f0e382ca63eb51e0.tar.gz
emacs-e4a225a97d066b069417d4e0f0e382ca63eb51e0.zip
(ls-lisp-format): Under -s, print the size in blocks with %4.0f, in case
they have a *really* huge file.
-rw-r--r--lisp/ls-lisp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index cdcc2f2a73b..a498c07321f 100644
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -257,7 +257,7 @@ are: A a c i r S s t u"
257 (format "%6d " (nth 10 file-attr))) 257 (format "%6d " (nth 10 file-attr)))
258 ;; nil is treated like "" in concat 258 ;; nil is treated like "" in concat
259 (if (memq ?s switches) ; size in K 259 (if (memq ?s switches) ; size in K
260 (format "%4d " (fceiling (/ file-size 1024.0)))) 260 (format "%4.0f " (fceiling (/ file-size 1024.0))))
261 (nth 8 file-attr) ; permission bits 261 (nth 8 file-attr) ; permission bits
262 ;; numeric uid/gid are more confusing than helpful 262 ;; numeric uid/gid are more confusing than helpful
263 ;; Emacs should be able to make strings of them. 263 ;; Emacs should be able to make strings of them.