branch: elpa/aidermacs commit 16c971f288ea18c83a012be385f1f8fb1f5048d0 Author: Romain Ouabdelkader <romain.ouabdelka...@voodoo.io> Commit: Matthew Zeng <matthew...@gmail.com>
fix file selection when the previous buffer was not closed --- aidermacs-output.el | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) diff --git a/aidermacs-output.el b/aidermacs-output.el index d3d3229ad9..8cd1f130c9 100644 --- a/aidermacs-output.el +++ b/aidermacs-output.el @@ -159,6 +159,7 @@ Kills all pre-edit buffers that were created to store original file content." Creates temporary buffers containing the original content of all tracked files. This is skipped if `aidermacs-show-diff-after-change' is nil." (when aidermacs-show-diff-after-change + (aidermacs--cleanup-temp-buffers) (when-let* ((files aidermacs--tracked-files)) (let ((attempts 0) (max-attempts 3)) @@ -434,15 +435,20 @@ This is skipped if `aidermacs-show-diff-after-change' is nil." (font-lock-mode 1) (setq buffer-read-only t)) -(define-key aidermacs-file-diff-selection-mode-map (kbd "q") - (lambda () - (interactive) - (kill-buffer) - (aidermacs--cleanup-temp-buffers))) +(defun aidermacs--file-diff-selection-quit () + "Quit file selection" + (interactive) + (kill-buffer) + (aidermacs--cleanup-temp-buffers)) + +(define-key aidermacs-file-diff-selection-mode-map (kbd "q") 'aidermacs--file-diff-selection-quit) (defun aidermacs--show-file-selection-buffer (files) "Display a buffer with a list of FILES that were edited. User can select a file to view its diff." + (when-let (buf (get-buffer "*aidermacs-edited-files*")) + (kill-buffer buf)) + (let ((buf (get-buffer-create "*aidermacs-edited-files*")) (pre-edit-file-buffers aidermacs--pre-edit-file-buffers)) (with-current-buffer buf