From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 27 Nov 2006 14:07:26 +0000 (+0000)
Subject: (tar-header-block-summarize, tar-clear-modification-flags): "?\ " -> "?\s".
X-Git-Tag: emacs-pretest-22.0.92~459
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5d56b61a05b4fb8ac844422efe9ebdd7ef70198;p=emacs.git

(tar-header-block-summarize, tar-clear-modification-flags): "?\ " -> "?\s".
---

diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index a02fd1b2ba9..b1f0176b0f3 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -363,7 +363,7 @@ MODE should be an integer which is a file mode value."
 		  ((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 @@ for this to be permanent."
   (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))))