Use map! with after! to setup bindings
Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
dbf9e9e2c7
commit
2527306069
1 changed files with 27 additions and 26 deletions
|
@ -1,33 +1,34 @@
|
||||||
;;; lang/lean/config.el -*- lexical-binding: t; -*-
|
;;; lang/lean/config.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
(use-package! company-lean
|
(after! lean-mode
|
||||||
:when (featurep :completion 'company)
|
|
||||||
:after lean-mode
|
|
||||||
:config (set-company-backend! 'lean-mode 'company-lean))
|
|
||||||
|
|
||||||
(use-package! lean-mode
|
|
||||||
:config
|
|
||||||
(set-lookup-handlers! 'lean-mode
|
(set-lookup-handlers! 'lean-mode
|
||||||
:definition #'lean-find-definition)
|
:definition #'lean-find-definition)
|
||||||
(sp-with-modes 'lean-mode
|
(sp-with-modes 'lean-mode
|
||||||
(sp-local-pair "/-" "-/")
|
(sp-local-pair "/-" "-/")
|
||||||
(sp-local-pair "`'" nil :actions :rem)
|
(sp-local-pair "`" "`")
|
||||||
(sp-local-pair "{" "}")
|
(sp-local-pair "{" "}")
|
||||||
(sp-local-pair "«" "»"))
|
(sp-local-pair "«" "»")
|
||||||
(map!
|
(sp-local-pair "⟨" "⟩")
|
||||||
:map lean-mode-map
|
(sp-local-pair "⟪" "⟫"))
|
||||||
:localleader
|
(map! :map lean-mode-map
|
||||||
"g" #'lean-toggle-show-goal
|
:localleader
|
||||||
"n" #'lean-toggle-next-error
|
"g" #'lean-toggle-show-goal
|
||||||
(:prefix "s"
|
"n" #'lean-toggle-next-error
|
||||||
"r" #'lean-server-restart
|
(:prefix ("s" . "server")
|
||||||
"s" #'lean-server-stop
|
"r" #'lean-server-restart
|
||||||
"v" #'lean-server-switch-version)
|
"s" #'lean-server-stop
|
||||||
(:prefix "p"
|
"v" #'lean-server-switch-version)
|
||||||
"t" #'lean-leanpkg-test
|
(:prefix ("p" . "leanpkg")
|
||||||
"b" #'lean-leanpkg-build
|
"t" #'lean-leanpkg-test
|
||||||
"c" #'lean-leanpkg-configure)
|
"b" #'lean-leanpkg-build
|
||||||
"f" #'lean-fill-placeholder
|
"c" #'lean-leanpkg-configure)
|
||||||
"h" #'lean-hole
|
"f" #'lean-fill-placeholder
|
||||||
"m" #'lean-message-boxes-toggle
|
"h" #'lean-hole
|
||||||
"e" #'lean-execute))
|
"m" #'lean-message-boxes-toggle
|
||||||
|
"e" #'lean-execute))
|
||||||
|
|
||||||
|
|
||||||
|
(use-package! company-lean
|
||||||
|
:when (featurep! :completion company)
|
||||||
|
:after lean-mode
|
||||||
|
:config (set-company-backend! 'lean-mode 'company-lean))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue