Mercurial > emacs
diff lisp/tar-mode.el @ 74243:b5548562a340
(tar-header-block-summarize, tar-clear-modification-flags): "?\ " -> "?\s".
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 27 Nov 2006 14:07:26 +0000 |
| parents | 1af74e601432 |
| children | e3694f1cb928 f1d13e615070 |
line wrap: on
line diff
--- a/lisp/tar-mode.el Mon Nov 27 14:05:58 2006 +0000 +++ b/lisp/tar-mode.el Mon Nov 27 14:07:26 2006 +0000 @@ -363,7 +363,7 @@ ((eq type 29) ?M) ; multivolume continuation ((eq type 35) ?S) ; sparse ((eq type 38) ?V) ; volume header - (t ?\ ) + (t ?\s) ) (tar-grind-file-mode mode) (if (= 0 (length uname)) uid uname) @@ -958,7 +958,7 @@ (save-excursion (goto-char (point-min)) (while (< (position-bytes (point)) tar-header-offset) - (if (not (eq (following-char) ?\ )) + (if (not (eq (following-char) ?\s)) (progn (delete-char 1) (insert " "))) (forward-line 1))))