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