Commit Diff


commit - 660cf35dc5e0307c8196608a1e7fbdf2178ba32a
commit + e4ac2ae5463d3a443169a082af423e82571b8f88
blob - d3a624a53e45876734044baa829deca717afe6df
blob + cf555fd3fe358f495eb6ea2baddf427b29373ee4
--- vc-got.el
+++ vc-got.el
@@ -664,14 +664,12 @@ It's like `vc-process-filter' but supports \r inside S
 ;; eventually a rebase.
 (defun vc-got-pull (prompt)
   "Execute a pull prompting for the full command if PROMPT is not nil."
-  (let ((default-directory (vc-got-root default-directory)))
-    (vc-got--push-pull vc-got-program "fetch" prompt)))
+  (vc-got--push-pull vc-got-program "fetch" prompt))
 
 (defun vc-got-push (prompt)
   "Run git push (not got!) in the repository dir.
 If PROMPT is non-nil, prompt for the git command to run."
-  (let ((default-directory (vc-got--repo-root)))
-    (vc-got--push-pull vc-got-program "send" prompt)))
+  (vc-got--push-pull vc-got-program "send" prompt))
 
 
 ;; History functions