remove unneeded abstractions

This commit is contained in:
Adam Jeniski 2025-08-17 12:18:46 -09:00
parent 535c2e7472
commit 24e50fe9ba

View File

@ -7,17 +7,6 @@
,(unpack code))) ,(unpack code)))
;; utils
(fn opt! [[name value]]
(tset vim.o name value))
(fn nmap! [ks then-do desc]
(vim.keymap.set "n"
(.. "<leader>" ks)
(.. ":" then-do "<cr>")
(when desc {:desc desc})))
;; general keymaps ;; general keymaps
(->> [["fs" "w" "[f]ile [s]ave"] (->> [["fs" "w" "[f]ile [s]ave"]
@ -27,7 +16,11 @@
["bn" "bn" "[b]uffer [n]ext"] ;buffer controls ["bn" "bn" "[b]uffer [n]ext"] ;buffer controls
["bp" "bp" "[b]uffer [p]revious"] ["bp" "bp" "[b]uffer [p]revious"]
["bd" "bd" "[b]uffer [d]elete"]] ["bd" "bd" "[b]uffer [d]elete"]]
(a.map #(nmap! (unpack $1)))) (a.map (lambda [[ks then-do desc]]
(vim.keymap.set "n"
(.. "<leader>" ks)
(.. ":" then-do "<cr>")
(when desc {:desc desc})))))
;; general settings ;; general settings
(->> {:number true ;line numbers (->> {:number true ;line numbers
@ -60,12 +53,13 @@
:ignorecase true :ignorecase true
:smartcase true} :smartcase true}
(a.map-indexed opt!)) (a.map-indexed (lambda [[name value]]
(tset vim.o name value))))
;; speed up scroll ;; speed up scroll
(def scroll-speed 8) (def scroll-speed 8)
(vim.keymap.set "n" "<c-e>" (.. scroll-speed "<c-e>") {}) (vim.keymap.set "n" "<c-e>" (.. scroll-speed "<c-e>") {:desc "scroll down"})
(vim.keymap.set "n" "<c-y>" (.. scroll-speed "<c-y>") {}) (vim.keymap.set "n" "<c-y>" (.. scroll-speed "<c-y>") {:desc "scroll up"})
(comment (comment
;; repl imports ;; repl imports