From 1b74d822c3124b5097e7d230788142d594057c5f Mon Sep 17 00:00:00 2001
From: "Itai Y. Efrat" <itai3397@gmail.com>
Date: Sun, 25 Apr 2021 18:32:47 +0300
Subject: [PATCH] selectrum: orderless now works

---
 modules/completion/selectrum/TODO.org  | 1 -
 modules/completion/selectrum/config.el | 3 ++-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/modules/completion/selectrum/TODO.org b/modules/completion/selectrum/TODO.org
index f0233f234..c3fcc8a7d 100644
--- a/modules/completion/selectrum/TODO.org
+++ b/modules/completion/selectrum/TODO.org
@@ -2,7 +2,6 @@
 ** TODO Start-up with recent files
 ** TODO Add vanilla keybindings
 *** TODO Add keybinding for embark-act
-** TODO ~+orderless~ doesn't work
 * PROJ List of things needed for Ivy parity
 ** TODO Icons
 https://github.com/minad/marginalia/issues/59
diff --git a/modules/completion/selectrum/config.el b/modules/completion/selectrum/config.el
index a22dff925..5667faf03 100644
--- a/modules/completion/selectrum/config.el
+++ b/modules/completion/selectrum/config.el
@@ -38,7 +38,7 @@
 
 (use-package! orderless
   :when (featurep! +orderless)
-  :defer t
+  :after selectrum
   :init
   (setq orderless-component-separator "[ &]"
         orderless-matching-styles '(orderless-prefixes
@@ -47,6 +47,7 @@
   :config
   (setq completion-styles '(orderless))
   (setq orderless-skip-highlighting (lambda () selectrum-active-p))
+  (setq selectrum-refine-candidates-function #'orderless-filter)
   (setq selectrum-highlight-candidates-function #'orderless-highlight-matches)
   (setq orderless-matching-styles '(orderless-regexp)
         orderless-style-dispatchers '(flex-if-twiddle