Mercurial > emacs
diff lisp/ls-lisp.el @ 5457:4fe8a94b0aa6
(ls-lisp-format): Bad format for uid and gid fixed.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 06 Jan 1994 04:34:43 +0000 |
| parents | b3f0b10b39c8 |
| children | 9e51b51e8595 |
line wrap: on
line diff
--- a/lisp/ls-lisp.el Thu Jan 06 04:33:55 1994 +0000 +++ b/lisp/ls-lisp.el Thu Jan 06 04:34:43 1994 +0000 @@ -185,14 +185,14 @@ ;; 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)