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/persistence.fnl | 36 ++++++++++++++++++------------------
 1 file changed, 18 insertions(+), 18 deletions(-)

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

diff --git a/fnl/plugins/persistence.fnl b/fnl/plugins/persistence.fnl
index e84ec58..2e81e78 100644
--- a/fnl/plugins/persistence.fnl
+++ b/fnl/plugins/persistence.fnl
@@ -1,5 +1,7 @@
 ;; Session manager.
 
+(import-macros {: user-cmds} :macros)
+
 (local keys [{1 :<leader>sn 2 :<cmd>RestoreSession<cr> :desc "Restore session"}
              {1 :<leader>se
               2 :<cmd>RestoreLastSession<cr>
@@ -8,25 +10,23 @@
               2 :<cmd>IgnoreSession<cr>
               :desc "Ignore current session"}])
 
-(local user-cmds [[:RestoreSession
-                   (λ []
-                     (let [persistence (require :persistence)]
-                       (persistence.load)))
-                   {:nargs 0}]
-                  [:RestoreLastSession
-                   (λ []
-                     (let [persistence (require :persistence)]
-                       (persistence.load {:last true})))
-                   {:nargs 0}]
-                  [:IgnoreSession
-                   (λ []
-                     (let [persistence (require :persistence)]
-                       (persistence.stop)))
-                   {:nargs 0}]])
-
 (λ init []
-  (let [{: create-user-cmds} (require :util.cmds)]
-    (create-user-cmds user-cmds)))
+  (user-cmds
+    [:RestoreSession
+     (λ []
+       (let [persistence (require :persistence)]
+         (persistence.load)))
+     {:nargs 0}]
+    [:RestoreLastSession
+     (λ []
+       (let [persistence (require :persistence)]
+         (persistence.load {:last true})))
+     {:nargs 0}]
+    [:IgnoreSession
+     (λ []
+       (let [persistence (require :persistence)]
+         (persistence.stop)))
+     {:nargs 0}]))
 
 (local opts {:options [:buffers :curdir :tabpages :winsize :help]})
 
-- 
cgit v1.2.3-70-g09d2