emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/jinx 9ee56ba9fd: Shorten jinx-languages predicate


From: ELPA Syncer
Subject: [elpa] externals/jinx 9ee56ba9fd: Shorten jinx-languages predicate
Date: Tue, 28 Mar 2023 08:58:40 -0400 (EDT)

branch: externals/jinx
commit 9ee56ba9fd4f813f4fac1f136b9670f98660c92c
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Shorten jinx-languages predicate
---
 jinx.el | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/jinx.el b/jinx.el
index 8e52498085..eca3528335 100644
--- a/jinx.el
+++ b/jinx.el
@@ -134,12 +134,9 @@
 ;;;###autoload
 (put 'jinx-languages 'safe-local-variable
      (lambda (val)
-       (or (stringp val)
-           (and (listp val)
-                (catch 'break
-                  (dolist (s val t)
-                    (unless (stringp s)
-                      (throw 'break nil))))))))
+       (while (and (consp val) (stringp (car val)))
+         (setq val (cdr val)))
+       (or (not val) (stringp val))))
 
 (defcustom jinx-include-faces
   '((prog-mode font-lock-comment-face



reply via email to

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