branch: externals/vc-jj
commit e505ad90ee11a14486cdb9a4361e3423d17dcc5b
Author: Rob <bruno.rob...@gmail.com>
Commit: Rob <bruno.rob...@gmail.com>

    Use when-let*
    
    Prepare for Emacs 31.1
---
 vc-jj.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vc-jj.el b/vc-jj.el
index 3ee9b1d50a..de4783d5b5 100644
--- a/vc-jj.el
+++ b/vc-jj.el
@@ -105,7 +105,7 @@ NIL otherwise."
   (when (executable-find vc-jj-program)
     (unless (not (file-exists-p default-directory))
       (with-demoted-errors "Error: %S"
-        (when-let ((root (vc-jj-root file)))
+        (when-let* ((root (vc-jj-root file)))
           (let* ((default-directory root)
                  (relative (file-relative-name file)))
             (vc-jj--file-tracked relative)))))))

Reply via email to