]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix uses of treesit-ready-p
authorYuan Fu <casouri@gmail.com>
Sun, 20 Nov 2022 02:58:12 +0000 (18:58 -0800)
committerYuan Fu <casouri@gmail.com>
Sun, 20 Nov 2022 02:58:12 +0000 (18:58 -0800)
* lisp/progmodes/c-ts-mode.el (c-ts-mode)
(c++-ts-mode)
* lisp/progmodes/java-ts-mode.el (java-ts-mode)
* lisp/progmodes/js.el (js-ts-mode)
* lisp/progmodes/json-ts-mode.el (json-ts-mode)
* lisp/progmodes/python.el (python-ts-mode)
* lisp/progmodes/sh-script.el (sh-mode)
* lisp/progmodes/ts-mode.el (ts-mode): Remove the MODE argument.

lisp/progmodes/c-ts-mode.el
lisp/progmodes/java-ts-mode.el
lisp/progmodes/js.el
lisp/progmodes/json-ts-mode.el
lisp/progmodes/python.el
lisp/progmodes/sh-script.el
lisp/progmodes/ts-mode.el

index 43668a56d960018d775a1c5183eeb87cc7410696..9fc7e6f67c22bdaa314209f2ce352cbec2edcd73 100644 (file)
@@ -494,7 +494,7 @@ the subtrees."
   "Major mode for editing C, powered by tree-sitter."
   :group 'c
 
-  (unless (treesit-ready-p nil 'c)
+  (unless (treesit-ready-p 'c)
     (error "Tree-sitter for C isn't available"))
 
   (treesit-parser-create 'c)
@@ -519,7 +519,7 @@ the subtrees."
   "Major mode for editing C++, powered by tree-sitter."
   :group 'c++
 
-  (unless (treesit-ready-p nil 'cpp)
+  (unless (treesit-ready-p 'cpp)
     (error "Tree-sitter for C++ isn't available"))
 
   ;; Comments.
index d3cae1dcca1fee4d10a1bd183b9a1cb04d360252..6a800d292c85c7ee08aa246d01e1fcd4a8108ef7 100644 (file)
@@ -277,7 +277,7 @@ the subtrees."
   :group 'java
   :syntax-table java-ts-mode--syntax-table
 
-  (unless (treesit-ready-p nil 'java)
+  (unless (treesit-ready-p 'java)
     (error "Tree-sitter for Java isn't available"))
 
   (treesit-parser-create 'java)
index 97e6c4f41079e65f43de30a226b590ce3e2d2a39..4b07c0d12c827df4b2bdff7acde38a0db7993db8 100644 (file)
@@ -3799,7 +3799,7 @@ Currently there are `js-mode' and `js-ts-mode'."
 
 \\<js-ts-mode-map>"
   :group 'js
-  (when (treesit-ready-p 'js-mode 'javascript)
+  (when (treesit-ready-p 'javascript)
     ;; Borrowed from `js-mode'.
     (setq-local prettify-symbols-alist js--prettify-symbols-alist)
     (setq-local parse-sexp-ignore-comments t)
index c1d3d283b8e5b80797ab2c4c1d77516d2c837f01..7e0dd1791143afe043826fa033c8a2f9e85b36bd 100644 (file)
@@ -124,7 +124,7 @@ the subtrees."
   :group 'json
   :syntax-table json-ts-mode--syntax-table
 
-  (unless (treesit-ready-p nil 'json)
+  (unless (treesit-ready-p 'json)
     (error "Tree-sitter for JSON isn't available"))
 
   (treesit-parser-create 'json)
index 456f141960ea43db97b9655429e93886a3da9231..d16aeaf013360dfeaedeb4122f350bbd8502f040 100644 (file)
@@ -6591,7 +6591,7 @@ implementations: `python-mode' and `python-ts-mode'."
   "Major mode for editing Python files, using tree-sitter library.
 
 \\{python-mode-map}"
-  (when (treesit-ready-p 'python-mode 'python)
+  (when (treesit-ready-p 'python)
     (treesit-parser-create 'python)
     (setq-local treesit-font-lock-feature-list
                 '(( comment string definition)
index 3b66cdfab478f6f302cc5c20510f5824008f169d..ed06f2263e43f9f1bcb88146736626fc255ebe78 100644 (file)
@@ -1587,7 +1587,7 @@ with your script for an edit-interpret-debug cycle."
 
   (cond
    ;; Tree-sitter.  If the shell is bash, we can enable tree-sitter.
-   ((treesit-ready-p 'sh-mode sh-shell)
+   ((treesit-ready-p sh-shell)
     (setq-local treesit-font-lock-feature-list
                 '((comment function string heredoc)
                   (variable keyword command declaration-command)
index a6f8e0a65eebe872ba76e25380010a28dbecce2e..01719a89ee2e6149a097e0f3e4076e02c471d9d0 100644 (file)
   (cond
    ;; `ts-mode' requires tree-sitter to work, so we don't check if
    ;; user enables tree-sitter for it.
-   ((treesit-ready-p nil 'tsx)
+   ((treesit-ready-p 'tsx)
     ;; Tree-sitter.
     (treesit-parser-create 'tsx)