From 745722ba42fdf0575a8b450260072fda8e5e2f40 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Thu, 7 Oct 2021 16:01:03 -0500
Subject: Change definition to use seq-some

---
 init.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 6467bd9..aa2bb9a 100644
--- a/init.el
+++ b/init.el
@@ -523,11 +523,10 @@
 
   (defun list-string-match-p (string regexp-list)
     "Return t if at least one regex in RETGEXP-LIST matches STRING, else nil."
-    (when string                        ; if STRING is nil, return nil.
-      (catch 'found
-        (dolist (regexp regexp-list)
-          (when (string-match regexp string)
-            (throw 'found t))))))
+    ;; FINE alphapapa ;P
+    (seq-some (lambda (regexp)
+                (string-match regexp string))
+              regexp-list))
 
   (defun flymake-unless ()
     "Turn on `flymake-mode', UNLESS it's inhibited.
-- 
cgit 1.4.1-21-gabe81