451 |
Also, for regular files that are executable, append `*'. |
Also, for regular files that are executable, append `*'. |
452 |
The file type indicators are `/' for directories, `@' for symbolic |
The file type indicators are `/' for directories, `@' for symbolic |
453 |
links, `|' for FIFOs, `=' for sockets, and nothing for regular files. |
links, `|' for FIFOs, `=' for sockets, and nothing for regular files. |
454 |
\[But FIFOs and sockets are not recognised.] |
\[But FIFOs and sockets are not recognized.] |
455 |
FILEDATA has the form (filename . `file-attributes'). Its `cadr' is t |
FILEDATA has the form (filename . `file-attributes'). Its `cadr' is t |
456 |
for directory, string (name linked to) for symbolic link, or nil." |
for directory, string (name linked to) for symbolic link, or nil." |
457 |
(let ((dir (cadr filedata)) (file-name (car filedata))) |
(let ((dir (cadr filedata)) (file-name (car filedata))) |