diff options
| author | Philip Kaludercic <philipk@posteo.net> | 2022-11-16 10:46:43 +0100 |
|---|---|---|
| committer | Philip Kaludercic <philipk@posteo.net> | 2022-11-17 20:55:04 +0100 |
| commit | db28ba29ddad0deda8aee3513d2652e95fc15342 (patch) | |
| tree | 95fc50ed1c357a50217f40b1b67b862648f62e2a /lisp/emacs-lisp | |
| parent | 0b77909cac1ef6705dfb1d4aed0d64ccc55864cf (diff) | |
| download | emacs-db28ba29ddad0deda8aee3513d2652e95fc15342.tar.gz emacs-db28ba29ddad0deda8aee3513d2652e95fc15342.tar.bz2 emacs-db28ba29ddad0deda8aee3513d2652e95fc15342.zip | |
Ensure 'package-vc-prepare-patch' runs in the right directory
* lisp/emacs-lisp/package-vc.el (package-vc-prepare-patch): Bind
'default-directory'.p
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/package-vc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 7edecddaa1e..84c4dda6f4a 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -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 |