356 |
((eq type 5) ?d) ; directory |
((eq type 5) ?d) ; directory |
357 |
((eq type 6) ?p) ; FIFO/pipe |
((eq type 6) ?p) ; FIFO/pipe |
358 |
((eq type 20) ?*) ; directory listing |
((eq type 20) ?*) ; directory listing |
359 |
|
((eq type 28) ?L) ; next has longname |
360 |
((eq type 29) ?M) ; multivolume continuation |
((eq type 29) ?M) ; multivolume continuation |
361 |
((eq type 35) ?S) ; sparse |
((eq type 35) ?S) ; sparse |
362 |
((eq type 38) ?V) ; volume header |
((eq type 38) ?V) ; volume header |
661 |
(error "This is a %s, not a real file" |
(error "This is a %s, not a real file" |
662 |
(cond ((eq link-p 5) "directory") |
(cond ((eq link-p 5) "directory") |
663 |
((eq link-p 20) "tar directory header") |
((eq link-p 20) "tar directory header") |
664 |
|
((eq link-p 28) "next has longname") |
665 |
((eq link-p 29) "multivolume-continuation") |
((eq link-p 29) "multivolume-continuation") |
666 |
((eq link-p 35) "sparse entry") |
((eq link-p 35) "sparse entry") |
667 |
((eq link-p 38) "volume header") |
((eq link-p 38) "volume header") |