emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/vc-got 4093d2f 008/145: fix vc-got-registered


From: ELPA Syncer
Subject: [elpa] externals/vc-got 4093d2f 008/145: fix vc-got-registered
Date: Thu, 9 Sep 2021 15:58:22 -0400 (EDT)

branch: externals/vc-got
commit 4093d2f9a9b37cb58d2b733514812820462464f3
Author: Omar Polo <op@omarpolo.com>
Commit: Omar Polo <op@omarpolo.com>

    fix vc-got-registered
    
    before it didn't check if the file is into a got worktree.
---
 vc-got.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/vc-got.el b/vc-got.el
index 2d2fcfe..33c544a 100644
--- a/vc-got.el
+++ b/vc-got.el
@@ -200,9 +200,10 @@ DIR-OR-FILE."
   "Return non-nil if FILE is registered with got."
   (if (file-directory-p file)
       nil                               ;got doesn't track directories
-    (let ((status (vc-got--status file)))
-      (not (or (string-prefix-p "?" status)
-               (string-prefix-p "N" status))))))
+    (when (vc-find-root file ".got")
+      (let ((status (vc-got--status file)))
+        (not (or (string-prefix-p "?" status)
+                 (string-prefix-p "N" status)))))))
 
 ;; (vc-got-registered "/usr/ports/mystuff/net/td")
 ;; (vc-got-registered "/usr/ports/mystuff/net/td/Makefile")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]