From 2a94573f54c69a9af7536586ab2c03eb88bda5e7 Mon Sep 17 00:00:00 2001
From: Gustaf Rydholm <gustaf.rydholm@gmail.com>
Date: Fri, 5 Jan 2024 01:50:20 +0100
Subject: Refactor

---
 fnl/plugins/persistence.fnl | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 fnl/plugins/persistence.fnl

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

diff --git a/fnl/plugins/persistence.fnl b/fnl/plugins/persistence.fnl
new file mode 100644
index 0000000..1939564
--- /dev/null
+++ b/fnl/plugins/persistence.fnl
@@ -0,0 +1,33 @@
+;; Session manager.
+
+(local keys [{1 :<leader>sn 2 :<cmd>RestoreSession<cr> :desc "Restore session"}
+             {1 :<leader>se
+              2 :<cmd>RestoreLastSession<cr>
+              :desc "Restore last session"}
+             {1 :<leader>si
+              2 :<cmd>IgnoreSession<cr>
+              :desc "Ignore current session"}])
+
+(local user-cmds [[:RestoreSession
+                   (lambda []
+                     (let [persistence (require :persistence)]
+                       (persistence.load)))
+                   {:nargs 0}]
+                  [:RestoreLastSession
+                   (lambda []
+                     (let [persistence (require :persistence)]
+                       (persistence.load {:last true})))
+                   {:nargs 0}]
+                  [:IgnoreSession
+                   (lambda []
+                     (let [persistence (require :persistence)]
+                       (persistence.stop)))
+                   {:nargs 0}]])
+
+(fn init []
+  (let [cmds (require :util.cmds)]
+    (cmds.create-user-cmds user-cmds)))
+
+(local opts {:options [:buffers :curdir :tabpages :winsize :help]})
+
+{1 :folke/persistence.nvim :event :BufReadPre : init : keys : opts}
-- 
cgit v1.2.3-70-g09d2