159 lines
9.3 KiB
Fennel
159 lines
9.3 KiB
Fennel
(let [mod {}
|
|
keymap vim.keymap
|
|
legendary (require :legendary)
|
|
substitute (require :substitute)
|
|
telescope (require :telescope)
|
|
telescope-builtin (require :telescope.builtin)
|
|
telescope-themes (require :telescope.themes)
|
|
telescope-nifoc (require :nifoc.telescope)
|
|
telescope-toggleterm (require :telescope-toggleterm)
|
|
telescope-ivy (telescope-themes.get_ivy)
|
|
telescope-dropdown (telescope-themes.get_dropdown)
|
|
npairs (require :nvim-autopairs)
|
|
gitsigns (require :gitsigns)
|
|
repl (require :nifoc.repl)]
|
|
(fn map-entry [key cmd opts]
|
|
(vim.tbl_extend :keep {1 key 2 cmd} opts))
|
|
|
|
(fn mod.setup []
|
|
(keymap.set :n :<space> :<nop> {:noremap true})
|
|
(set vim.g.mapleader " ")
|
|
(set vim.opt.timeoutlen 500)
|
|
(legendary.bind_keymaps [(map-entry :<leader>o
|
|
telescope-nifoc.project-files
|
|
{:description "Find Files"})
|
|
(map-entry :<leader>s
|
|
#(telescope-builtin.live_grep telescope-ivy)
|
|
{:description "Live Grep"})
|
|
(map-entry :<leader>fn :<cmd>enew<CR>
|
|
{:description "New File"})
|
|
(map-entry :<leader>ut :<cmd>UndotreeToggle<CR>
|
|
{:description "Toggle Undotree"})
|
|
(map-entry :<leader>c repl.toggle-shell
|
|
{:description "Toggle Shell"})
|
|
(map-entry :<leader>cs
|
|
#(telescope-toggleterm.open telescope-dropdown)
|
|
{:description "Select Terminal"})
|
|
(map-entry :<leader>r repl.toggle-repl
|
|
{:description "Toggle REPL"})
|
|
;; Buffer
|
|
(map-entry :<leader>bl
|
|
#(telescope-builtin.buffers telescope-dropdown)
|
|
{:description "List Buffers"})
|
|
(map-entry :<leader>bn
|
|
:<cmd>BufferLineCycleNext<CR>
|
|
{:description "Next Buffer"})
|
|
(map-entry :<leader>bp
|
|
:<cmd>BufferLineCyclePrev<CR>
|
|
{:description "Previous Buffer"})
|
|
(map-entry :<leader>bf
|
|
#(telescope-builtin.current_buffer_fuzzy_find telescope-dropdown)
|
|
{:description "Find In Buffer"})
|
|
(map-entry :<leader>bt
|
|
#(telescope-builtin.treesitter telescope-dropdown)
|
|
{:description "Find Via Treesitter"})
|
|
;; Project
|
|
(map-entry :<leader>pt :<cmd>TodoTelescope<CR>
|
|
{:description "TODO Comments"})
|
|
;; VCS
|
|
(map-entry :<leader>vs
|
|
#(telescope-builtin.git_status telescope-ivy)
|
|
{:description "VCS Status"})
|
|
(map-entry :<leader>vb
|
|
#(telescope-builtin.git_branches telescope-dropdown)
|
|
{:description "List VCS Branches"})
|
|
(map-entry :<leader>vl gitsigns.blame_line
|
|
{:description "Blame Line"})
|
|
(map-entry :<leader>vn :<cmd>Neogit<CR>
|
|
{:description "Open Neogit"})
|
|
(map-entry :<leader>vc "<cmd>Neogit commit<CR>"
|
|
{:description "Neogit Commit"})
|
|
(map-entry :<leader>vp "<cmd>Neogit pull<CR>"
|
|
{:description "Neogit Pull"})
|
|
(map-entry :<leader>vP "<cmd>Neogit push<CR>"
|
|
{:description "Neogit Push"})
|
|
;; Legendary
|
|
(map-entry :<leader>lk #(legendary.find :keymaps)
|
|
{:description "Legendary Keymaps"})
|
|
(map-entry :<leader>lc #(legendary.find :commands)
|
|
{:description "Legendary Commands"})
|
|
(map-entry :<leader>la #(legendary.find :autocmds)
|
|
{:description "Legendary Autocmds"})
|
|
;; Debug
|
|
(map-entry :<leader>dli :<cmd>LspInfo<CR>
|
|
{:description "LSP Info"})
|
|
(map-entry :<leader>dlr :<cmd>LspRestart<CR>
|
|
{:description "LSP Restart"})
|
|
(map-entry :<leader>dt
|
|
:<cmd>TSPlaygroundToggle<CR>
|
|
{:description "Toggle Treetsitter Playground"})
|
|
(map-entry :<leader>dn
|
|
telescope.extensions.notify.notify
|
|
{:description "Display Notifications"})])
|
|
;; Other Mappings
|
|
(keymap.set :n :<CR> ":nohlsearch<CR><CR>" {:noremap true :silent true})
|
|
(keymap.set :i :<CR> npairs.autopairs_cr
|
|
{:noremap true :expr true :silent true})
|
|
(keymap.set :n :<A-Left> :b {:noremap true})
|
|
(keymap.set :n :<A-Right> :w {:noremap true})
|
|
(keymap.set :n :<S-Left> "^" {:noremap true})
|
|
(keymap.set :n :<S-Right> "$" {:noremap true})
|
|
(keymap.set :i :<A-Left> :<C-o>b {:noremap true})
|
|
(keymap.set :i :<A-Right> :<C-o>w {:noremap true})
|
|
(keymap.set :i :<S-Left> :<C-o>^ {:noremap true})
|
|
(keymap.set :i :<S-Right> :<C-o>$ {:noremap true})
|
|
(keymap.set :n :p "<Plug>(YankyPutAfter)")
|
|
(keymap.set :n :P "<Plug>(YankyPutBefore)")
|
|
(keymap.set :x :p substitute.visual)
|
|
(keymap.set :x :P "<Plug>(YankyPutBefore)")
|
|
(keymap.set :n :gp "<Plug>(YankyGPutAfter)")
|
|
(keymap.set :n :gP "<Plug>(YankyGPutBefore)")
|
|
(keymap.set :x :gp "<Plug>(YankyGPutAfter)")
|
|
(keymap.set :x :gP "<Plug>(YankyGPutBefore)")
|
|
(keymap.set :n :y "<Plug>(YankyYank)")
|
|
(keymap.set :x :y "<Plug>(YankyYank)"))
|
|
|
|
(fn mod.lsp-attach [client bufnr]
|
|
(legendary.bind_keymaps [(map-entry :<leader>t
|
|
#(telescope-builtin.lsp_document_symbols telescope-dropdown)
|
|
{:description "LSP Document Symbols"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :<leader>ld
|
|
#(telescope-builtin.diagnostics (vim.tbl_extend :keep
|
|
telescope-ivy
|
|
{: bufnr}))
|
|
{:description "LSP Document Diagnostics"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :<leader>lca
|
|
#(telescope-builtin.lsp_code_actions telescope-dropdown)
|
|
{:description "LSP Code Action"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :<leader>lfr
|
|
#(telescope-builtin.lsp_references telescope-dropdown)
|
|
{:description "Find References"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :<leader>lfd
|
|
#(telescope-builtin.lsp_definitions telescope-dropdown)
|
|
{:description "Find Definitions"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :<leader>lfi
|
|
#(telescope-builtin.lsp_implementations telescope-dropdown)
|
|
{:description "Find Implementations"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :K vim.lsp.buf.hover
|
|
{:description "Show Documentation"
|
|
:opts {:buffer bufnr}})
|
|
(map-entry :F :<cmd>Format<CR>
|
|
{:description "Format Buffer"
|
|
:opts {:buffer bufnr}})]))
|
|
|
|
(fn mod.terminal-open [bufnr]
|
|
(let [map-opts {:noremap true :buffer bufnr}]
|
|
(keymap.set :t :<esc> "<C-\\><C-n>" map-opts)
|
|
(keymap.set :t :<C-h> "<C-\\><C-n><C-W>h" map-opts)
|
|
(keymap.set :t :<C-j> "<C-\\><C-n><C-W>j" map-opts)
|
|
(keymap.set :t :<C-k> "<C-\\><C-n><C-W>k" map-opts)
|
|
(keymap.set :t :<C-l> "<C-\\><C-n><C-W>l" map-opts)))
|
|
|
|
mod)
|
|
|