[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 32ed6e610f4: (project-switch-project): Fix the previous change
From: |
Dmitry Gutov |
Subject: |
master 32ed6e610f4: (project-switch-project): Fix the previous change |
Date: |
Wed, 1 Nov 2023 16:50:28 -0400 (EDT) |
branch: master
commit 32ed6e610f4a29a6adebc89a7b37d1b4beb54ec1
Author: Dmitry Gutov <dmitry@gutov.dev>
Commit: Dmitry Gutov <dmitry@gutov.dev>
(project-switch-project): Fix the previous change
* lisp/progmodes/project.el (project-switch-project):
Clear the buffer-local value in the right buffer (bug#66317).
---
lisp/progmodes/project.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 5129dc98b82..57d9d8e99ab 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -2029,12 +2029,14 @@ to directory DIR."
(interactive (list (funcall project-prompter)))
(let ((command (if (symbolp project-switch-commands)
project-switch-commands
- (project--switch-project-command))))
+ (project--switch-project-command)))
+ (buffer (current-buffer)))
(unwind-protect
(progn
(setq-local project-current-directory-override dir)
(call-interactively command))
- (kill-local-variable 'project-current-directory-override))))
+ (with-current-buffer buffer
+ (kill-local-variable 'project-current-directory-override)))))
;;;###autoload
(defun project-uniquify-dirname-transform (dirname)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 32ed6e610f4: (project-switch-project): Fix the previous change,
Dmitry Gutov <=