Set the current directory in ‘vc-p4-dir-extra-headers’

It seems like it might be possible that this function gets called in the wrong
directory, so just to be sure set the current directory to the one passed in.
This _should_ make sure that ‘p4’ is called in the right directory.
This commit is contained in:
Tom Willemse 2021-09-16 23:02:04 -07:00
parent 2180dc8535
commit bab0d7083d
Signed by: ryuslash
GPG key ID: 7D5C407B435025C1

View file

@ -1023,7 +1023,8 @@ documentation for that command for their meanings."
(defun vc-p4-dir-extra-headers (dir) (defun vc-p4-dir-extra-headers (dir)
"Get extra Perforce-specific vc-dir headers related to DIR." "Get extra Perforce-specific vc-dir headers related to DIR."
(let ((extra-info (p4-lowlevel-info))) (let* ((default-directory dir)
(extra-info (p4-lowlevel-info)))
(concat (concat
(propertize "Client :" 'face 'font-lock-type-face) (propertize "Client :" 'face 'font-lock-type-face)
" " " "