1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00

(ls-lisp-format): Bad format for uid and gid fixed.

This commit is contained in:
Richard M. Stallman 1994-01-06 04:34:43 +00:00
parent 35f7e85bda
commit 7b4a3608d3

View File

@ -185,14 +185,14 @@ The switches that work are: A a c i r S s t u"
;; Emacs should be able to make strings of them.
;; user-login-name and user-full-name could take an
;; optional arg.
(format " %3d %-8d %-8d %8d "
(format " %3d %8s %8s %8d "
(nth 1 file-attr) ; no. of links
(if (= (user-uid) (nth 2 file-attr))
(user-login-name)
(nth 2 file-attr)) ; uid
(int-to-string (nth 2 file-attr))) ; uid
(if (eq system-type 'ms-dos)
"root" ; everything is root on MSDOS.
(nth 3 file-attr)) ; gid
(int-to-string (nth 3 file-attr))) ; gid
(nth 7 file-attr) ; size in bytes
)
(ls-lisp-format-time file-attr switches)