Mercurial > emacs
comparison lisp/ls-lisp.el @ 110990:7b9f631537db
merge emacs-23
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 14 Oct 2010 11:06:31 +0900 |
parents | cda2045a5ee8 |
children | b8fde5ef9e14 21858bb1a2e7 |
comparison
equal
deleted
inserted
replaced
110984:287d5a665560 | 110990:7b9f631537db |
---|---|
619 ;; Numeric uid/gid are more confusing than helpful; | 619 ;; Numeric uid/gid are more confusing than helpful; |
620 ;; Emacs should be able to make strings of them. | 620 ;; Emacs should be able to make strings of them. |
621 ;; They tend to be bogus on non-UNIX platforms anyway so | 621 ;; They tend to be bogus on non-UNIX platforms anyway so |
622 ;; optionally hide them. | 622 ;; optionally hide them. |
623 (if (memq 'uid ls-lisp-verbosity) | 623 (if (memq 'uid ls-lisp-verbosity) |
624 ;; uid can be a sting or an integer | 624 ;; uid can be a string or an integer |
625 (let ((uid (nth 2 file-attr))) | 625 (let ((uid (nth 2 file-attr))) |
626 (format (if (stringp uid) | 626 (format (if (stringp uid) |
627 ls-lisp-uid-s-fmt | 627 ls-lisp-uid-s-fmt |
628 ls-lisp-uid-d-fmt) | 628 ls-lisp-uid-d-fmt) |
629 uid))) | 629 uid))) |