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

@@ -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")
+

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: '))"