diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/tar-mode.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5708f3b1952..2eadd9aa6e3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-06-01 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * tar-mode.el (tar-header-block-summarize): Ensure one space around | ||
| 4 | user&group. | ||
| 5 | |||
| 1 | 2008-05-31 John Paul Wallington <jpw@pobox.com> | 6 | 2008-05-31 John Paul Wallington <jpw@pobox.com> |
| 2 | 7 | ||
| 3 | * help-fns.el (describe-variable-custom-version-info): Handle | 8 | * help-fns.el (describe-variable-custom-version-info): Handle |
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index 931ef8907fa..4d05746a347 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el | |||
| @@ -398,7 +398,7 @@ MODE should be an integer which is a file mode value." | |||
| 398 | ;; (ck (tar-header-checksum tar-hblock)) | 398 | ;; (ck (tar-header-checksum tar-hblock)) |
| 399 | (type (tar-header-link-type tar-hblock)) | 399 | (type (tar-header-link-type tar-hblock)) |
| 400 | (link-name (tar-header-link-name tar-hblock))) | 400 | (link-name (tar-header-link-name tar-hblock))) |
| 401 | (format "%c%c%s%8s/%-8s%7s%s %s%s" | 401 | (format "%c%c%s %7s/%-7s %7s%s %s%s" |
| 402 | (if mod-p ?* ? ) | 402 | (if mod-p ?* ? ) |
| 403 | (cond ((or (eq type nil) (eq type 0)) ?-) | 403 | (cond ((or (eq type nil) (eq type 0)) ?-) |
| 404 | ((eq type 1) ?h) ; link | 404 | ((eq type 1) ?h) ; link |