[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/vc-sccs.el
From: |
André Spiegel |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/vc-sccs.el |
Date: |
Sun, 22 Jan 2006 16:10:07 +0000 |
Index: emacs/lisp/vc-sccs.el
diff -u emacs/lisp/vc-sccs.el:1.29 emacs/lisp/vc-sccs.el:1.30
--- emacs/lisp/vc-sccs.el:1.29 Tue Nov 1 10:39:41 2005
+++ emacs/lisp/vc-sccs.el Sun Jan 22 16:10:07 2006
@@ -122,15 +122,15 @@
;; We have to be careful not to exclude files with execute bits on;
;; scripts can be under version control too. Also, we must ignore the
;; group-read and other-read bits, since paranoid users turn them off.
- (let* ((attributes (file-attributes file))
- (owner-uid (nth 2 attributes))
+ (let* ((attributes (file-attributes file 'string))
+ (owner-name (nth 2 attributes))
(permissions (nth 8 attributes)))
(if (string-match ".r-..-..-." permissions)
'up-to-date
(if (string-match ".rw..-..-." permissions)
(if (file-ownership-preserved-p file)
'edited
- (vc-user-login-name owner-uid))
+ owner-name)
;; Strange permissions.
;; Fall through to real state computation.
(vc-sccs-state file))))
- [Emacs-diffs] Changes to emacs/lisp/vc-sccs.el,
André Spiegel <=