From 87640f70617860ad331ee7f1113bdd955f4080d3 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Fri, 16 Feb 2024 08:08:14 +0100 Subject: orderless-without: orderless--compile-component can return nil --- orderless.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/orderless.el b/orderless.el index b7deb76..01d434d 100644 --- a/orderless.el +++ b/orderless.el @@ -275,7 +275,7 @@ regexp." (defun orderless-without (component) "Match strings that do *not* match COMPONENT." - (let ((regexp (cdr (orderless--compile-component component)))) + (when-let ((regexp (cdr (orderless--compile-component component)))) (lambda (str) (not (string-match-p regexp str))))) -- cgit v1.0