string-suffix-p is faster than regexp matching

mattiase · Jul 14, 2024 · 9cb20f8 · 9cb20f8
1 parent 07666b7
commit 9cb20f8
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/relint.el b/relint.el
@@ -2309,12 +2309,10 @@ directly."
                               (symbol-name name))
               (relint--check-alist-any re-arg name pos (cons 2 path))
               (push name relint--checked-variables))
-             ((string-match-p (rx "-mode-alist" eos)
-                              (symbol-name name))
+             ((string-suffix-p "-mode-alist" (symbol-name name))
               (relint--check-list-any re-arg name pos (cons 2 path))
               (push name relint--checked-variables))
-             ((string-match-p (rx "-rules-list" eos)
-                              (symbol-name name))
+             ((string-suffix-p "-rules-list" (symbol-name name))
               (relint--check-rules-list re-arg name pos (cons 2 path))
               (push name relint--checked-variables))
              ((string-match-p (rx (or (seq (or bos ?-) "treesit")