diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-05-26 17:41:30 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-05-26 17:41:30 +0000 |
commit | 32d956a88601d0130721a9f4acab4898a959240d (patch) | |
tree | 71b1882897f6b1db482e3cdd89817ff9ad854ee9 /lisp/tar-mode.el | |
parent | c9087628695cb90dfba56867ff392df2f961bf3c (diff) | |
download | emacs-32d956a88601d0130721a9f4acab4898a959240d.tar.gz emacs-32d956a88601d0130721a9f4acab4898a959240d.tar.bz2 emacs-32d956a88601d0130721a9f4acab4898a959240d.zip |
(tar-header-block-summarize): Ensure one space around user&group.
Diffstat (limited to 'lisp/tar-mode.el')
-rw-r--r-- | lisp/tar-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index 04ce5dc83a9..834d048fc4f 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -349,7 +349,7 @@ MODE should be an integer which is a file mode value." ;; (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 |