From db5bc4eacc3f8283b9de42df688dc12149358d96 Mon Sep 17 00:00:00 2001
From: Gustaf Rydholm <gustaf.rydholm@gmail.com>
Date: Fri, 22 Sep 2023 23:57:25 +0200
Subject: Fix dadbod and worktree keys
---
fnl/plugins/editor/dadbod.fnl | 4 ++--
fnl/plugins/editor/git-worktree.fnl | 4 ++--
fnl/plugins/editor/which-key.fnl | 5 ++++-
3 files changed, 8 insertions(+), 5 deletions(-)
(limited to 'fnl/plugins')
diff --git a/fnl/plugins/editor/dadbod.fnl b/fnl/plugins/editor/dadbod.fnl
index cc6fa64..016b9ce 100644
--- a/fnl/plugins/editor/dadbod.fnl
+++ b/fnl/plugins/editor/dadbod.fnl
@@ -1,10 +1,10 @@
;; Plugins for interacting with databases.
-(local keys [{1 :<leader>wn
+(local keys [{1 :<leader>dn
2 :<cmd>DBUIToggle<cr>
:mode :n
:desc "Toggle Dadbod UI"}
- {1 :<leader>we
+ {1 :<leader>de
2 :<cmd>DBUIAddConnection<cr>
:mode :n
:desc "Add DB connection"}])
diff --git a/fnl/plugins/editor/git-worktree.fnl b/fnl/plugins/editor/git-worktree.fnl
index ec57195..8812859 100644
--- a/fnl/plugins/editor/git-worktree.fnl
+++ b/fnl/plugins/editor/git-worktree.fnl
@@ -1,10 +1,10 @@
;; Plugins for working with git-worktrees.
-(local keys [{1 :<leader>ge
+(local keys [{1 :<leader>wn
2 "<cmd>lua require('telescope').extensions.git_worktree.git_worktrees()<cr>"
:mode :n
:desc "Switch between worktrees"}
- {1 :<leader>gi
+ {1 :<leader>we
2 "<cmd>lua require('telescope').extensions.git_worktree.create_git_worktree()<cr>"
:mode :n
:desc "Create a worktree"}])
diff --git a/fnl/plugins/editor/which-key.fnl b/fnl/plugins/editor/which-key.fnl
index 00fea1c..84197d7 100644
--- a/fnl/plugins/editor/which-key.fnl
+++ b/fnl/plugins/editor/which-key.fnl
@@ -28,14 +28,17 @@
:triggers_blacklist {:i [:j :k] :v [:j :k]}})
(local groups {:mode [:n :v]
+ :<leader>d {:name :+db}
:<leader>f {:name :+find}
:<leader>g {:name :+git}
+ :<leader>i {:name :+diffview}
:<leader>j {:name :+diagnostics}
:<leader>l {:name :+lsp}
:<leader>o {:name :+orgmode}
:<leader>r {:name :+replace}
:<leader>s {:name :+session}
- :<leader>w {:name :+db}})
+ :<leader>w {:name :+worktree}
+ })
(fn setup []
(let [which-key (require :which-key)]
--
cgit v1.2.3-70-g09d2