Mercurial > emacs
comparison lisp/eshell/em-ls.el @ 31241:3099993cba0f
See ChangeLog
author | John Wiegley <johnw@newartisans.com> |
---|---|
date | Tue, 29 Aug 2000 00:47:45 +0000 |
parents | 34b1ab9d583d |
children | aab90b31807c |
comparison
equal
deleted
inserted
replaced
31240:10b1c85c0bbe | 31241:3099993cba0f |
---|---|
818 'eshell-ls-directory-face) | 818 'eshell-ls-directory-face) |
819 | 819 |
820 ((not (eshell-ls-filetype-p (cdr file) ?-)) | 820 ((not (eshell-ls-filetype-p (cdr file) ?-)) |
821 'eshell-ls-special-face) | 821 'eshell-ls-special-face) |
822 | 822 |
823 ((and (not (= (user-uid) 0)) ; root can execute anything | 823 ((and (/= (user-uid) 0) ; root can execute anything |
824 (eshell-ls-applicable (cdr file) 3 | 824 (eshell-ls-applicable (cdr file) 3 |
825 'file-executable-p (car file))) | 825 'file-executable-p (car file))) |
826 'eshell-ls-executable-face) | 826 'eshell-ls-executable-face) |
827 | 827 |
828 ((not (eshell-ls-applicable (cdr file) 1 | 828 ((not (eshell-ls-applicable (cdr file) 1 |