Mercurial > emacs

diff lisp/vc-sccs.el @ 68416:64e8a95ba226

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-sccs-state): Pass FILE to vc-user-login-name.
author André Spiegel <spiegel@gnu.org>
date Fri, 27 Jan 2006 19:12:42 +0000
parents ccad9ac08a6d
children 3bd95f4f2941 9b150bc96d33 7432ca837c8d
line wrap: on
line diff
--- a/lisp/vc-sccs.el	Fri Jan 27 19:12:13 2006 +0000
+++ b/lisp/vc-sccs.el	Fri Jan 27 19:12:42 2006 +0000
@@ -108,7 +108,7 @@
               (if (vc-workfile-unchanged-p file)
                   'up-to-date
                 'unlocked-changes)
-            (if (string= locking-user (vc-user-login-name))
+            (if (string= locking-user (vc-user-login-name file))
                 'edited
               locking-user)))
       'up-to-date)))