Mercurial > emacs
changeset 65027:966abb81fa37
(dired-move-to-end-of-filename):
Handle fifo as rendered by "ls -lF": Don't include trailing "|".
author | Thien-Thi Nguyen <ttn@gnuvola.org> |
---|---|
date | Thu, 18 Aug 2005 11:28:59 +0000 |
parents | e1cc4b0d18d3 |
children | 7a906f0b4386 |
files | lisp/dired.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Thu Aug 18 09:29:48 2005 +0000 +++ b/lisp/dired.el Thu Aug 18 11:28:59 2005 +0000 @@ -1953,11 +1953,11 @@ (eq (preceding-char) ?@) ;; did ls really mark the link? (forward-char -1)))) (goto-char eol) ;; else not a symbolic link - ;; ls -lF marks dirs, sockets and executables with exactly one - ;; trailing character. (Executable bits on symlinks ain't mean + ;; ls -lF marks dirs, sockets, fifos and executables with exactly + ;; one trailing character. (Executable bits on symlinks ain't mean ;; a thing, even to ls, but we know it's not a symlink.) (and used-F - (or (memq file-type '(?d ?s)) + (or (memq file-type '(?d ?s ?p)) executable) (forward-char -1)))) (or no-error