Mercurial > emacs
changeset 15517:d9bb8f6b05a0
Comment changes.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 26 Jun 1996 18:01:42 +0000 |
| parents | f8e362279cbb |
| children | d01e58c9e431 |
| files | lisp/vc-hooks.el |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Wed Jun 26 18:00:52 1996 +0000 +++ b/lisp/vc-hooks.el Wed Jun 26 18:01:42 1996 +0000 @@ -880,15 +880,16 @@ (and vc-display-status (vc-status file))))) ;; If the file is locked by some other user, make ;; the buffer read-only. Like this, even root - ;; cannot modify a file without locking it first. + ;; cannot modify a file that someone else has locked. (and vc-type (equal file (buffer-file-name)) (vc-locking-user file) (not (string= (user-login-name) (vc-locking-user file))) (setq buffer-read-only t)) - ;; If the user is root, and the file is not owner-readable, - ;; then pretend that we can't read it - ;; even though we can (because root can read anything). + ;; If the user is root, and the file is not owner-writable, + ;; then pretend that we can't write it + ;; even though we can (because root can write anything). + ;; This way, even root cannot modify a file that isn't locked. (and vc-type (equal file (buffer-file-name)) (not buffer-read-only)