From 99a7ff44cdf70d028ef6aab26224f26f69ee528d Mon Sep 17 00:00:00 2001
From: aktersnurra <gustaf@gustafrydholm.xyz>
Date: Thu, 16 Apr 2026 15:10:52 +0200
Subject: Add fff and other nice things such as macros

---
 fnl/plugins/harpoon.fnl | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

(limited to 'fnl/plugins/harpoon.fnl')

diff --git a/fnl/plugins/harpoon.fnl b/fnl/plugins/harpoon.fnl
index 3f8f7ac..29f41d0 100644
--- a/fnl/plugins/harpoon.fnl
+++ b/fnl/plugins/harpoon.fnl
@@ -1,28 +1,28 @@
 ;; Harpoon files for navigation.
 
+(import-macros {: user-cmds} :macros)
+
 (local opts
        {:ui_max_width 64
         :title " ⇁  "
         :settings {:save_on_toggle true :sync_on_ui_close true}})
 
-(local user-cmds [[:HarpoonAdd
-                   (λ []
-                     (let [harpoon (require :harpoon)]
-                       (: (harpoon:list) :add)))
-                   {:nargs 0}]
-                  [:HarpoonUI
-                   (λ []
-                     (let [harpoon (require :harpoon)]
-                       (harpoon.ui:toggle_quick_menu (harpoon:list) opts)))
-                   {:nargs 0}]])
-
 (λ select [nr]
   (let [harpoon (require :harpoon)]
     (: (harpoon:list) :select nr)))
 
 (λ init []
-  (let [{: create-user-cmds} (require :util.cmds)]
-    (create-user-cmds user-cmds)))
+  (user-cmds
+    [:HarpoonAdd
+     (λ []
+       (let [harpoon (require :harpoon)]
+         (: (harpoon:list) :add)))
+     {:nargs 0}]
+    [:HarpoonUI
+     (λ []
+       (let [harpoon (require :harpoon)]
+         (harpoon.ui:toggle_quick_menu (harpoon:list) opts)))
+     {:nargs 0}]))
 
 (local keys [{1 :ma 2 :<cmd>HarpoonAdd<cr> :desc :Harpoon}
              {1 :mr 2 :<cmd>HarpoonUI<cr> :desc "Harpoon UI"}
-- 
cgit v1.2.3-70-g09d2