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

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

[elpa] externals/orderless 3f76b7d1a1 185/204: Delete duplicate regexps


From: ELPA Syncer
Subject: [elpa] externals/orderless 3f76b7d1a1 185/204: Delete duplicate regexps (fix #73)
Date: Tue, 11 Jan 2022 12:58:29 -0500 (EST)

branch: externals/orderless
commit 3f76b7d1a198627c4f69c378b504afbda03145e8
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>

    Delete duplicate regexps (fix #73)
    
    In the common case where people search for a string with no special
    regexp characters and are using both the orderless-regexp and
    orderless-literal matching styles, a regexp containing blah\|blah was
    produced. This takes care of that case.
---
 orderless.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/orderless.el b/orderless.el
index 2981a2ed81..b3b7688419 100644
--- a/orderless.el
+++ b/orderless.el
@@ -376,7 +376,7 @@ as the value of DISPATCHERS."
    for regexps = (cl-loop for style in newstyles
                           for result = (funcall style newcomp)
                           when result collect `(regexp ,result))
-   when regexps collect (rx-to-string `(or ,@regexps))))
+   when regexps collect (rx-to-string `(or ,@(delete-dups regexps)))))
 
 ;;; Completion style implementation
 



reply via email to

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