diff options
| author | Dmitry Gutov <dmitry@gutov.dev> | 2023-06-02 05:10:15 +0300 |
|---|---|---|
| committer | Dmitry Gutov <dmitry@gutov.dev> | 2023-06-02 05:10:15 +0300 |
| commit | 753f8aa1f14c2ff5d86b086230d600eb9bb5d8bc (patch) | |
| tree | 63b34bcc8b9a64364736a583557f9c575d1cce3c | |
| parent | 17c7915ab947ebeec6ea5ad3eb4cad1f24d5d4fc (diff) | |
| download | emacs-753f8aa1f14c2ff5d86b086230d600eb9bb5d8bc.tar.gz emacs-753f8aa1f14c2ff5d86b086230d600eb9bb5d8bc.tar.bz2 emacs-753f8aa1f14c2ff5d86b086230d600eb9bb5d8bc.zip | |
Fix project-name for vc-aware backend in non-file buffers
* lisp/progmodes/project.el (project-name): Make sure
project-vc-name is picked up from dir-locals in all
non-file-visiting buffers too (mentioned in bug#63469).
| -rw-r--r-- | lisp/progmodes/project.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 617ca45ed0d..d482cc24d70 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -805,8 +805,8 @@ DIRS must contain directory names." (push buf bufs))) (nreverse bufs))) -(cl-defmethod project-name ((_project (head vc))) - (or project-vc-name +(cl-defmethod project-name ((project (head vc))) + (or (project--value-in-dir 'project-vc-name (project-root project)) (cl-call-next-method))) |