From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 6 Mar 1995 04:37:18 +0000 (+0000)
Subject: (tar-grind-file-mode): Doc fix.
X-Git-Tag: emacs-19.34~4936
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6a06ace60b75e80891e6ce033dc65b08dadfb888;p=emacs.git

(tar-grind-file-mode): Doc fix.
---

diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 1be7041562d..7375e5411e3 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -335,7 +335,8 @@ write-date, checksum, link-type, and link-name."
     (concat (substring str 4 16) (substring str 19 24))))
 
 (defun tar-grind-file-mode (mode string start)
-  "Write a \"-rw--r--r-\" representing MODE into STRING beginning at START."
+  "Store `-rw--r--r--' indicating MODE into STRING beginning at START.
+MODE should be an integer which is a file mode value."
   (aset string start       (if (zerop (logand 256 mode)) ?- ?r))
   (aset string (+ start 1) (if (zerop (logand 128 mode)) ?- ?w))
   (aset string (+ start 2) (if (zerop (logand  64 mode)) ?- ?x))