From d474c779523c512e3bc91bc5ce7bc87cafc6372b Mon Sep 17 00:00:00 2001
From: Gustaf Rydholm <gustaf.rydholm@gmail.com>
Date: Sat, 23 Sep 2023 22:05:37 +0200
Subject: Move user and auto cmds to plugins

---
 fnl/plugins/editor/telescope.fnl | 22 +++++++++++++++++++---
 1 file changed, 19 insertions(+), 3 deletions(-)

(limited to 'fnl/plugins/editor/telescope.fnl')

diff --git a/fnl/plugins/editor/telescope.fnl b/fnl/plugins/editor/telescope.fnl
index 8f2bff3..83cb4a1 100644
--- a/fnl/plugins/editor/telescope.fnl
+++ b/fnl/plugins/editor/telescope.fnl
@@ -6,6 +6,22 @@
   (each [_ extension (ipairs extensions)]
     (telescope.load_extension extension)))
 
+(fn telescope-builtin [builtin opts]
+  (let [telescope (require :telescope.builtin)
+        themes (require :telescope.themes)
+        theme (. opts :theme)]
+    ((. telescope builtin) ((. themes theme) opts))))
+
+(local user-cmds [[:FindFiles
+              (lambda []
+                (telescope-builtin :find_files
+                                   {:theme :get_dropdown :previewer false}))
+              {:nargs 0}]])
+
+(fn init []
+  (let [cmds (require :util.cmds)]
+    (cmds.create-user-cmds user-cmds)))
+
 (local keys [{1 :mf 2 :<cmd>FindFiles<cr> :desc "Find Files"}
              {1 :mg
               2 "<cmd>Telescope live_grep theme=dropdown<cr>"
@@ -60,7 +76,7 @@
               2 "<cmd>Telescope lsp_document_symbols theme=dropdown<cr>"
               :desc "Document Symbols"}])
 
-(fn setup []
+(fn config []
   (let [telescope (require :telescope)
         actions (require :telescope.actions)
         icons (require :plugins.icons)]
@@ -140,8 +156,8 @@
 
 {1 :nvim-telescope/telescope.nvim
  :cmd :Telescope
- :config (fn []
-           (setup))
+ : init
+ : config
  :dependencies [:nvim-lua/popup.nvim
                 :nvim-telescope/telescope-frecency.nvim
                 {1 :nvim-telescope/telescope-fzf-native.nvim :build :make}
-- 
cgit v1.2.3-70-g09d2