branch: externals/orderless
commit e49e86776bf5077cd0846b5c6f1ca19e14b0dd87
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Revert "orderless-pattern-compiler: Create fewer intermediate data
structures"
This reverts commit ebd2b841de857c568b547446a27ed9e58e1354eb.
---
orderless.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/orderless.el b/orderless.el
index 5d5c569bf1..45bd5c81de 100644
--- a/orderless.el
+++ b/orderless.el
@@ -384,8 +384,8 @@ as the value of DISPATCHERS."
when (functionp newstyles) do (setq newstyles (list newstyles))
for regexps = (cl-loop for style in newstyles
for result = (funcall style newcomp)
- when result collect result)
- when regexps collect (string-join (delete-dups regexps) "\\|")))
+ when result collect `(regexp ,result))
+ when regexps collect (rx-to-string `(or ,@(delete-dups regexps)))))
;;; Completion style implementation
