summaryrefslogtreecommitdiff
path: root/lisp/tar-mode.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2002-03-28 18:15:47 +0000
committerRichard M. Stallman <rms@gnu.org>2002-03-28 18:15:47 +0000
commitf95807815b76c98efd0f3a465e72d49e3417d5f5 (patch)
treeb7d6e49e54f7629dc2edacbda6ea46e5dc82baeb /lisp/tar-mode.el
parent8ab4da6cc028d2a7a2b39273626a3f9c86bcd0b1 (diff)
downloademacs-f95807815b76c98efd0f3a465e72d49e3417d5f5.tar.gz
(tar-header-block-summarize, tar-get-descriptor):
Support "next has longname" link type.
Diffstat (limited to 'lisp/tar-mode.el')
-rw-r--r--lisp/tar-mode.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 576d8be02e6..9d0a6d2e6c9 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -356,6 +356,7 @@ MODE should be an integer which is a file mode value."
((eq type 5) ?d) ; directory
((eq type 6) ?p) ; FIFO/pipe
((eq type 20) ?*) ; directory listing
+ ((eq type 28) ?L) ; next has longname
((eq type 29) ?M) ; multivolume continuation
((eq type 35) ?S) ; sparse
((eq type 38) ?V) ; volume header
@@ -660,6 +661,7 @@ appear on disk when you save the tar-file's buffer."
(error "This is a %s, not a real file"
(cond ((eq link-p 5) "directory")
((eq link-p 20) "tar directory header")
+ ((eq link-p 28) "next has longname")
((eq link-p 29) "multivolume-continuation")
((eq link-p 35) "sparse entry")
((eq link-p 38) "volume header")