ryuslash/vc-p4
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Use the right client for ‘vc-dir’

Browse source
This commit is contained in:
Tom Willemse 2021-03-10 18:10:16 -08:00
parent 461b1357f9
commit 0f054faa4d
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
vc-p4.el
View file

@ -189,7 +189,9 @@ compare non-open files to the depot version."
_FILES is ignored. The UPDATE-FUNCTION is used to process the _FILES is ignored. The UPDATE-FUNCTION is used to process the
results of this function." results of this function."
;; XXX: this should be asynchronous. ;; XXX: this should be asynchronous.
(let ((lists (p4-lowlevel-fstat (let* ((vc-p4-client (with-current-buffer (find-file-noselect dir)
vc-p4-client))
(lists (p4-lowlevel-fstat
(format "%s/..." (directory-file-name (expand-file-name dir))) (format "%s/..." (directory-file-name (expand-file-name dir)))
:noerror t :noerror t
:client vc-p4-client))) :client vc-p4-client)))