Commit d3b75e45b97b

Vincent Demeester <vincent@sbr.pm>
2022-08-22 16:14:43
tools/emacs: fix project-current mismatch between emacs versions
Signed-off-by: Vincent Demeester <vincent@sbr.pm>
main
1 parent e523816
Changed files (1)
tools
emacs
config
config-projects.el
tools/emacs/config/config-projects.el
@@ -36,12 +36,15 @@
 
   :init
   (setq-default project-compilation-buffer-name-function 'project-prefixed-buffer-name)
+  (defun vde-project--project-current ()
+    "Return directory from `project-current' based on Emacs version."
+    (if (>= emacs-major-version 29)
+        (project-root (project-current))
+      (cdr (project-current))))
   (defun vde-project-magit-status ()
     "Run `magit-status' on project."
     (interactive)
-    (let* ((pr (project-current t))
-           (dir (cdr pr)))
-      (magit-status dir)))
+    (magit-status (vde-project--project-current)))
 
   (defun vde-project-vterm ()
     "Run `vterm' on project.