aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2002-03-28 18:15:47 +0000
committerRichard M. Stallman2002-03-28 18:15:47 +0000
commitf95807815b76c98efd0f3a465e72d49e3417d5f5 (patch)
treeb7d6e49e54f7629dc2edacbda6ea46e5dc82baeb
parent8ab4da6cc028d2a7a2b39273626a3f9c86bcd0b1 (diff)
downloademacs-f95807815b76c98efd0f3a465e72d49e3417d5f5.tar.gz
emacs-f95807815b76c98efd0f3a465e72d49e3417d5f5.zip
(tar-header-block-summarize, tar-get-descriptor):
Support "next has longname" link type.
-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."
356 ((eq type 5) ?d) ; directory 356 ((eq type 5) ?d) ; directory
357 ((eq type 6) ?p) ; FIFO/pipe 357 ((eq type 6) ?p) ; FIFO/pipe
358 ((eq type 20) ?*) ; directory listing 358 ((eq type 20) ?*) ; directory listing
359 ((eq type 28) ?L) ; next has longname
359 ((eq type 29) ?M) ; multivolume continuation 360 ((eq type 29) ?M) ; multivolume continuation
360 ((eq type 35) ?S) ; sparse 361 ((eq type 35) ?S) ; sparse
361 ((eq type 38) ?V) ; volume header 362 ((eq type 38) ?V) ; volume header
@@ -660,6 +661,7 @@ appear on disk when you save the tar-file's buffer."
660 (error "This is a %s, not a real file" 661 (error "This is a %s, not a real file"
661 (cond ((eq link-p 5) "directory") 662 (cond ((eq link-p 5) "directory")
662 ((eq link-p 20) "tar directory header") 663 ((eq link-p 20) "tar directory header")
664 ((eq link-p 28) "next has longname")
663 ((eq link-p 29) "multivolume-continuation") 665 ((eq link-p 29) "multivolume-continuation")
664 ((eq link-p 35) "sparse entry") 666 ((eq link-p 35) "sparse entry")
665 ((eq link-p 38) "volume header") 667 ((eq link-p 38) "volume header")