Revert "orderless-pattern-compiler: Create fewer intermediate data structures"

This reverts commit ebd2b841de857c568b547446a27ed9e58e1354eb.

1 files changed, 2 insertions, 2 deletions

diff --git a/orderless.el b/orderless.el
index 5d5c569..45bd5c8 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