From bc23f46cb211e8aba747c62c4ba4d893ef9e8d5c Mon Sep 17 00:00:00 2001
From: Proctor <steven.proctor@rate.com>
Date: Wed, 16 Feb 2022 09:05:30 -0600
Subject: [PATCH] Fix Clojure LSP key bindings

Also added key binding for SQL and DadBod-UI to run a single
SQL statement.
---
 nvim/.config/nvim/fnl/dotfiles/mapping.fnl          | 4 ++++
 nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/nvim/.config/nvim/fnl/dotfiles/mapping.fnl b/nvim/.config/nvim/fnl/dotfiles/mapping.fnl
index 7730b32..3b8773d 100644
--- a/nvim/.config/nvim/fnl/dotfiles/mapping.fnl
+++ b/nvim/.config/nvim/fnl/dotfiles/mapping.fnl
@@ -54,3 +54,7 @@
 
 ; Open file in Marked 2 (markdown viewer)
 (noremap :n :<leader>mv ":AsyncRun -mode=bang open -a Marked\\ 2.app \'%:p\'<cr>")
+
+; Run current statement in DadBod-UI
+(nvim.ex.autocmd :FileType :sql :nmap :<leader>s "vap<leader>S")
+
diff --git a/nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl b/nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl
index 54ebd6f..b445df7 100644
--- a/nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl
+++ b/nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl
@@ -49,7 +49,7 @@
   })
 
 (def client-nmappings
-  {:clojure
+  {:clojure_lsp
    {
     :<leader>cn "call LspExecuteCommand('clean-ns')"
     :<leader>ref "call LspExecuteCommand('extract-function', input('Function name: '))"