mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-24 10:38:38 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 1994-01-06 04:34:43 +00:00
parent 35f7e85bda
commit 7b4a3608d3
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ls-lisp.el
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)