From 1204496efa2fcd495bd74ba8ca249b7f082f3ba5 Mon Sep 17 00:00:00 2001
From: unwox <me@unwox.com>
Date: Tue, 15 Oct 2024 14:48:16 +0600
Subject: WIP try to fix spelling mistakes in search querie

currently works very slowly and uses a lot of CPU
---
 lib/array.fnl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'lib/array.fnl')

diff --git a/lib/array.fnl b/lib/array.fnl
index 6dc0780..8b81c5c 100644
--- a/lib/array.fnl
+++ b/lib/array.fnl
@@ -1,5 +1,9 @@
 (import-macros {: reduce} :lib.macro)
 
+(fn sort [a less-fn]
+  (table.sort a less-fn)
+  a)
+
 (fn concat [a b]
   (local copy
    (fn [a b]
@@ -51,4 +55,4 @@
 
 (local join table.concat)
 
-{: concat : diff : unique : flatten : join : contains}
+{: sort : concat : diff : unique : flatten : join : contains}
-- 
cgit v1.2.3