(vc-locking-user): Fixed wrong parentheses.

aadce164 · André Spiegel · 6cfd24f9 · aadce164
Commit aadce164 authored Sep 08, 1995 by André Spiegel
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/vc-hooks.el lisp/vc-hooks.el +2 -2

No files found.
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -625,11 +625,11 @@ For CVS, the full name of CVS/Entries is returned."
      ((eq (vc-backend file) 'SCCS)
       (or (vc-lock-from-permissions file)
 	   (vc-file-setprop file 'vc-locking-user 
-			    (vc-master-locking-user file))))))
+			    (vc-master-locking-user file)))))
  
      ;; convert a possible 'none value
      (setq locking-user (vc-file-getprop file 'vc-locking-user))
-      (if (eq locking-user 'none) nil locking-user)))
+      (if (eq locking-user 'none) nil locking-user))))

 ;;; properties to store current and recent version numbers