branch: externals/taxy
commit 436f345db3c32c394b9fafddaa4b26c3c1898a42
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>

    Change: (taxy-make-take-function) Use older pcase form
    
    Support for (pred (not PRED)) is new in Emacs 28.1.
---
 taxy.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/taxy.el b/taxy.el
index bc675a7..50df510 100644
--- a/taxy.el
+++ b/taxy.el
@@ -338,7 +338,8 @@ defined with a definer defined by 
`taxy-define-key-definer')."
                            . ,(and args (guard (pcase (car args)
                                                  ((or (pred keywordp)
                                                       (and (pred atom)
-                                                           (pred (not 
symbolp)))
+                                                           ;; SOMEDAY: Use 
(not symbolp) when depending on Emacs 28.1.
+                                                           (pred (lambda (it) 
(not (symbolp it)))))
                                                      `(quote ,_))
                                                   t)))))
                          ;; Key with args: replace with a lambda that

Reply via email to