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

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

[elpa] externals/vc-got cdd3e16 030/145: use vc-find-root instead of vc-


From: ELPA Syncer
Subject: [elpa] externals/vc-got cdd3e16 030/145: use vc-find-root instead of vc-got-root
Date: Thu, 9 Sep 2021 15:58:27 -0400 (EDT)

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

    use vc-find-root instead of vc-got-root
    
    I'm not entirely sure, but I don't want to cause cyclic dependencies
    between vc-got and vc-got-stage (even thought they depend on each
    others).
---
 vc-got-stage.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vc-got-stage.el b/vc-got-stage.el
index ae553d2..4d7a3bf 100644
--- a/vc-got-stage.el
+++ b/vc-got-stage.el
@@ -93,7 +93,7 @@ Higher values means higher priority.  DON'T use negative 
numbers.")
 (defun vc-got-stage--apply-impl (script tmp-file)
   "Apply the stages using SCRIPT as script (TMP-FILE is the path)."
   (interactive "P")
-  (let* ((default-directory (vc-got-root default-directory))
+  (let* ((default-directory (vc-find-root default-directory ".got"))
          (stage-buf         (get-buffer-create "*vc-got-stage*")))
     (unless (zerop (apply #'process-file "got" nil stage-buf nil "unstage"
                           (mapcar #'file-relative-name vc-got-stage-fileset)))



reply via email to

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