branch: master
commit b2de434c77168ebfefe6ea364f401533e6da349b
Author: Tino Calancha <tino.calan...@gmail.com>
Commit: Tino Calancha <tino.calan...@gmail.com>
gited--output-buffer: Set default-directory to `gited-toplevel-dir'
This helps `diff-goto-source' and `diff-apply-hunk' to find
the target file.
* packages/gited/gited.el (gited--output-buffer):
Set default-directory to `gited-toplevel-dir' in this buffer.
---
packages/gited/gited.el | 14 ++++++++++----
1 file changed, 10 insertions(+), 4 deletions(-)
diff --git a/packages/gited/gited.el b/packages/gited/gited.el
index 07715dc..9ef1798 100644
--- a/packages/gited/gited.el
+++ b/packages/gited/gited.el
@@ -8,11 +8,11 @@
;; Created: Wed Oct 26 01:28:54 JST 2016
;; Compatibility: GNU Emacs: 24.4
-;; Version: 0.5.4
+;; Version: 0.5.5
;; Package-Requires: ((emacs "24.4") (cl-lib "0.5"))
-;; Last-Updated: Tue Jul 30 18:28:26 CEST 2019
+;; Last-Updated: Thu Sep 05 05:02:26 CEST 2019
;; By: calancha
-;; Update #: 698
+;; Update #: 699
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
@@ -950,7 +950,13 @@ You can then feed the file name(s) to other commands with
\\[yank]."
(equal default-directory
(buffer-local-value 'default-directory buf))
buf)
- (generate-new-buffer buf-name))))
+ (let* ((toplevel-dir gited-toplevel-dir)
+ (new-buffer (generate-new-buffer buf-name)))
+ (with-current-buffer new-buffer
+ ;; Set default directory as `gited-toplevel-dir'; this
helps
+ ;; `diff-apply-hunk' or `diff-goto-source' to find the
target file.
+ (setq default-directory gited-toplevel-dir))
+ new-buffer))))
(if (equal buf-name gited-bisect-buf-name)
(setq gited-bisect-buffer res)
(setq gited-output-buffer res))))
