Ensure 'package-vc-prepare-patch' runs in the right directory

* lisp/emacs-lisp/package-vc.el (package-vc-prepare-patch): Bind
'default-directory'.p
This commit is contained in:
Philip Kaludercic 2022-11-16 10:46:43 +01:00
parent 0b77909cac
commit db28ba29dd

View file

@ -780,8 +780,9 @@ marked revisions, use those."
(and (not vc-prepare-patches-separately)
(read-string "Subject: " "[PATCH] " nil nil t))
(vc-prepare-patch-prompt-revisions)))
(vc-prepare-patch (package-maintainers pkg-desc t)
subject revisions))
(let ((default-directory (package-desc-dir pkg-desc)))
(vc-prepare-patch (package-maintainers pkg-desc t)
subject revisions)))
(provide 'package-vc)
;;; package-vc.el ends here