Mercurial > emacs

diff lisp/tar-mode.el @ 49806:2edf03d7c602

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tar-header-block-summarize): Use l for symlink, h for hard link.
author Richard M. Stallman <rms@gnu.org>
date Sat, 15 Feb 2003 19:20:47 +0000
parents e88404e8f2cf
children 695cf19ef79e
line wrap: on
line diff
--- a/lisp/tar-mode.el	Sat Feb 15 15:41:33 2003 +0000
+++ b/lisp/tar-mode.el	Sat Feb 15 19:20:47 2003 +0000
@@ -349,8 +349,8 @@
     (format "%c%c%s%8s/%-8s%7s%s %s%s"
 	    (if mod-p ?* ? )
 	    (cond ((or (eq type nil) (eq type 0)) ?-)
-		  ((eq type 1) ?l)	; link
-		  ((eq type 2) ?s)	; symlink
+		  ((eq type 1) ?h)	; link
+		  ((eq type 2) ?l)	; symlink
 		  ((eq type 3) ?c)	; char special
 		  ((eq type 4) ?b)	; block special
 		  ((eq type 5) ?d)	; directory