Mercurial > emacs
diff lisp/tar-mode.el @ 80592:8436412d2e08
(tar-header-block-summarize): Ensure one space around user&group.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 26 May 2008 17:41:30 +0000 |
parents | 9d42c705fd64 |
children | a4904e4111c5 |
line wrap: on
line diff
--- a/lisp/tar-mode.el Mon May 26 07:03:02 2008 +0000 +++ b/lisp/tar-mode.el Mon May 26 17:41:30 2008 +0000 @@ -349,7 +349,7 @@ ;; (ck (tar-header-checksum tar-hblock)) (type (tar-header-link-type tar-hblock)) (link-name (tar-header-link-name tar-hblock))) - (format "%c%c%s%8s/%-8s%7s%s %s%s" + (format "%c%c%s %7s/%-7s %7s%s %s%s" (if mod-p ?* ? ) (cond ((or (eq type nil) (eq type 0)) ?-) ((eq type 1) ?h) ; link