diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-01-06 04:34:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-01-06 04:34:43 +0000 |
| commit | 7b4a3608d3d7efb5cc12f216325a43db101677ac (patch) | |
| tree | ef6d56123204909024fccf9c9454e3051a4fc101 /lisp/ls-lisp.el | |
| parent | 35f7e85bdaaa49295d8042c64886511a341bc552 (diff) | |
| download | emacs-7b4a3608d3d7efb5cc12f216325a43db101677ac.tar.gz | |
(ls-lisp-format): Bad format for uid and gid fixed.
Diffstat (limited to 'lisp/ls-lisp.el')
| -rw-r--r-- | lisp/ls-lisp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el index e02b668aa71..38a68cdc10a 100644 --- a/lisp/ls-lisp.el +++ b/lisp/ls-lisp.el @@ -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) |