[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master b124cb8: vc-cvs-revert: fix off-by-one file mode
From: |
Paul Eggert |
Subject: |
[Emacs-diffs] master b124cb8: vc-cvs-revert: fix off-by-one file mode |
Date: |
Mon, 16 Sep 2019 20:23:16 -0400 (EDT) |
branch: master
commit b124cb8f30d575fcda97507c40f16a499640bcd5
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>
vc-cvs-revert: fix off-by-one file mode
* lisp/vc/vc-cvs.el (vc-cvs-revert): 3950 (#o7556) is wrong as
it keeps other-write but disables other-execute permissions.
3949 (#o7555) was intended here. Use octal notation for clarity.
---
lisp/vc/vc-cvs.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/vc/vc-cvs.el b/lisp/vc/vc-cvs.el
index d84700f..a9e79d7 100644
--- a/lisp/vc/vc-cvs.el
+++ b/lisp/vc/vc-cvs.el
@@ -440,7 +440,7 @@ REV is the revision to check out."
(if vc-cvs-use-edit
(vc-cvs-command nil 0 file "unedit")
;; Make the file read-only by switching off all w-bits
- (set-file-modes file (logand (file-modes file) 3950)))))
+ (set-file-modes file (logand (file-modes file) #o7555)))))
(defun vc-cvs-merge-file (file)
"Accept a file merge request, prompting for revisions."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master b124cb8: vc-cvs-revert: fix off-by-one file mode,
Paul Eggert <=