aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1994-01-06 04:34:43 +0000
committerRichard M. Stallman <[email protected]>1994-01-06 04:34:43 +0000
commit7b4a3608d3d7efb5cc12f216325a43db101677ac (patch)
treeef6d56123204909024fccf9c9454e3051a4fc101 /lisp
parent35f7e85bdaaa49295d8042c64886511a341bc552 (diff)
(ls-lisp-format): Bad format for uid and gid fixed.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ls-lisp.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index e02b668aa7..38a68cdc10 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)