Fix treesit-install-language-grammar (bug#63990)

* lisp/treesit.el:
(treesit-install-language-grammar): When called non-interactively,
out-dir should default to default-out-dir.

diff --git a/lisp/treesit.el b/lisp/treesit.el
index ea701ce1ff79dde900b8e509d06c4d2b93afbc89..d79e77323871c4944750c6dd62f4a597a78baf25 100644 (file)
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -3070,7 +3070,9 @@ nil, the grammar is installed to the standard location, the
                    nil
                    'treesit--install-language-grammar-out-dir-history
                    default-out-dir)
-                out-dir)))
+                ;; When called non-interactively, OUT-DIR should
+                ;; default to DEFAULT-OUT-DIR.
+                (or out-dir default-out-dir))))
     (condition-case err
         (progn
           (apply #'treesit--install-language-grammar-1