nvim - add keybinding to clear terminal scrollback

nvim/.config/nvim/fnl/dotfiles/mapping.fnl

@@ -81,6 +81,13 @@
 ; Trim trailing Whitespace in current line
 (util.lnnoremap :tw "<C-U>.s/\\s\\+$//ge<CR>:nohlsearch<Enter>/<BS>")
 
+
+;; <Leader><C-l> in terminal to clear scrollback buffer
+;; nmap <silent> <leader><C-l> :set scrollback=1 \| set scrollback=100000<cr>
+(util.lnnoremap :<C-k> ":set scrollback=1 | :set scrollback 100000<cr>" {:silent true})
+;; tmap <silent> <leader><C-l> <C-\><C-n><leader><C-l>i
+(util.ltnoremap :<C-k> "<C-\\><C-n><leader><C-l>i" {:silent true})
+
 ;; (noremap :n :<C-A-l> ":echo \"test\"\n")
 ; Window switching
 ; ˙ -> alt-h

nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl

@@ -14,19 +14,13 @@
 
 (defn xbufmap [from to] (bufmap :x from to))
 
-(defn define-sign [level sign]
-      (let [sign-level (.. :DiagnosticSign level)]
-        (nvim.fn.sign_define sign-level
-                             {:texthl sign-level :text sign :numhl sign-level})))
-
-;; (define-sign :Error "☢️")
-;; (define-sign :Warn "⚠️")
-;; (define-sign :SignHint "🔎")
-;; (define-sign :Info "ℹ️")
-(define-sign :Error :X)
-(define-sign :Warn "!")
-(define-sign :SignHint "?")
-(define-sign :Info :i)
+(vim.diagnostic.config
+  {:signs {:text {vim.diagnostic.severity.ERROR "☢️"
+                  vim.diagnostic.severity.WARN "⚠️"
+                  vim.diagnostic.severity.INFO "ℹ️"
+                  vim.diagnostic.severity.HINT "🔎"}
+           :linehl {vim.diagnostic.severity.ERROR :ErrorMsg}
+           :numhl {vim.diagnostic.severity.WARN :WarningMsg}}})
 
 (def core-nmappings
      {:gd "lua vim.lsp.buf.definition()"

nvim/.config/nvim/fnl/dotfiles/util.fnl

@@ -18,4 +18,6 @@
 
 (defn lnnoremap [from to] (nnoremap (.. :<leader> from) to))
 
-(defn lvnoremap [from to opts] (noremap :v (.. :<leader> from) to opts))
+(defn ltnoremap [from to opts] (noremap :v (.. :<leader> from) to opts))
+
+(defn lvnoremap [from to opts] (noremap :t (.. :<leader> from) to opts))