emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 4eb363acc82 2/3: ; Quietly skip 'lua-ts-mode' tests (bug#70786)


From: Yuan Fu
Subject: master 4eb363acc82 2/3: ; Quietly skip 'lua-ts-mode' tests (bug#70786)
Date: Wed, 8 May 2024 23:38:12 -0400 (EDT)

branch: master
commit 4eb363acc825ef3aaa5468ab5e206ecab5883acb
Author: john muhl <jm@pub.pink>
Commit: Yuan Fu <casouri@gmail.com>

    ; Quietly skip 'lua-ts-mode' tests (bug#70786)
    
    * test/lisp/align-tests.el (align-lua):
    * test/lisp/progmodes/lua-ts-mode-tests.el
    (lua-ts-test-indentation):
    (lua-ts-test-movement):
    (lua-ts-test-font-lock):
    (lua-ts-test-which-function): Suppress warnings when the grammar is not
    installed.
---
 test/lisp/align-tests.el                 | 2 +-
 test/lisp/progmodes/lua-ts-mode-tests.el | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/test/lisp/align-tests.el b/test/lisp/align-tests.el
index cd309ea07bf..eaebaf8360c 100644
--- a/test/lisp/align-tests.el
+++ b/test/lisp/align-tests.el
@@ -52,7 +52,7 @@
 (autoload 'treesit-ready-p "treesit")
 
 (ert-deftest align-lua ()
-  (skip-unless (treesit-ready-p 'lua))
+  (skip-unless (treesit-ready-p 'lua t))
   (let ((comment-column 20)
         (indent-tabs-mode nil))
     (ert-test-erts-file (ert-resource-file "lua-ts-mode.erts")
diff --git a/test/lisp/progmodes/lua-ts-mode-tests.el 
b/test/lisp/progmodes/lua-ts-mode-tests.el
index a7b637d18d1..68b8c9ccfaa 100644
--- a/test/lisp/progmodes/lua-ts-mode-tests.el
+++ b/test/lisp/progmodes/lua-ts-mode-tests.el
@@ -26,20 +26,20 @@
 (require 'which-func)
 
 (ert-deftest lua-ts-test-indentation ()
-  (skip-unless (treesit-ready-p 'lua))
+  (skip-unless (treesit-ready-p 'lua t))
   (ert-test-erts-file (ert-resource-file "indent.erts")))
 
 (ert-deftest lua-ts-test-movement ()
-  (skip-unless (treesit-ready-p 'lua))
+  (skip-unless (treesit-ready-p 'lua t))
   (ert-test-erts-file (ert-resource-file "movement.erts")))
 
 (ert-deftest lua-ts-test-font-lock ()
-  (skip-unless (treesit-ready-p 'lua))
+  (skip-unless (treesit-ready-p 'lua t))
   (let ((treesit-font-lock-level 4))
     (ert-font-lock-test-file (ert-resource-file "font-lock.lua") 
'lua-ts-mode)))
 
 (ert-deftest lua-ts-test-which-function ()
-  (skip-unless (treesit-ready-p 'lua))
+  (skip-unless (treesit-ready-p 'lua t))
   (with-temp-buffer
     (insert-file-contents (ert-resource-file "which-function.lua"))
     (lua-ts-mode)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]