emacs-diffs
[Top][All Lists]
Advanced

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

master e881a172d48: ; * lisp/treesit.el (treesit--read-major-mode): Use


From: Yuan Fu
Subject: master e881a172d48: ; * lisp/treesit.el (treesit--read-major-mode): Use string-suffix-p.
Date: Thu, 28 Sep 2023 00:53:20 -0400 (EDT)

branch: master
commit e881a172d483551ab546a4586beaa3d54ee0e148
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    ; * lisp/treesit.el (treesit--read-major-mode): Use string-suffix-p.
---
 lisp/treesit.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 0790ad7e011..fd8c8482fc8 100644
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1880,10 +1880,10 @@ Helper function to use in the `interactive' spec of 
`treesit-check-indent'."
           (format-prompt "Target major mode" default)
           obarray
           (lambda (sym)
-            (and (string-match-p "-mode\\'" (symbol-name sym))
+            (and (string-suffix-p "-mode" (symbol-name sym))
                  (not (or (memq sym minor-mode-list)
-                           (string-match-p "-minor-mode\\'"
-                                           (symbol-name sym))))))
+                           (string-suffix-p "-minor-mode"
+                                            (symbol-name sym))))))
           nil nil nil default nil)))
     (cond
      ((equal mode "nil") nil)



reply via email to

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