emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

add definition lookup handler to agda module

Browse source
This commit is contained in:
bottomtype 2020-09-28 02:10:29 +02:00
parent 1456108d5b
commit 1fa4516cad
1 changed files with 31 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

61
modules/lang/agda/config.el
View file

@ -7,33 +7,34 @@
(unless (require 'agda2 nil t) (unless (require 'agda2 nil t)
(message "Failed to find the `agda2' package"))) (message "Failed to find the `agda2' package")))
(after! agda2-mode
(map! :after agda2-mode (set-lookup-handlers! 'agda2-mode
:map agda2-mode-map :definition #'agda2-goto-definition-keyboard)
:localleader (map! :map agda2-mode-map
"?" #'agda2-show-goals :localleader
"." #'agda2-goal-and-context-and-inferred "?" #'agda2-show-goals
"," #'agda2-goal-and-context "." #'agda2-goal-and-context-and-inferred
"=" #'agda2-show-constraints "," #'agda2-goal-and-context
"SPC" #'agda2-give "=" #'agda2-show-constraints
"a" #'agda2-auto-maybe-all "SPC" #'agda2-give
"b" #'agda2-previous-goal "a" #'agda2-auto-maybe-all
"c" #'agda2-make-case "b" #'agda2-previous-goal
"d" #'agda2-infer-type-maybe-toplevel "c" #'agda2-make-case
"e" #'agda2-show-context "d" #'agda2-infer-type-maybe-toplevel
"f" #'agda2-next-goal "e" #'agda2-show-context
"gG" #'agda2-go-back "f" #'agda2-next-goal
"h" #'agda2-helper-function-type "gG" #'agda2-go-back
"l" #'agda2-load "h" #'agda2-helper-function-type
"n" #'agda2-compute-normalised-maybe-toplevel "l" #'agda2-load
"p" #'agda2-module-contents-maybe-toplevel "n" #'agda2-compute-normalised-maybe-toplevel
"r" #'agda2-refine "p" #'agda2-module-contents-maybe-toplevel
"s" #'agda2-solveAll "r" #'agda2-refine
"t" #'agda2-goal-type "s" #'agda2-solveAll
"w" #'agda2-why-in-scope-maybe-toplevel "t" #'agda2-goal-type
(:prefix "x" "w" #'agda2-why-in-scope-maybe-toplevel
"c" #'agda2-compile (:prefix "x"
"d" #'agda2-remove-annotations "c" #'agda2-compile
"h" #'agda2-display-implicit-arguments "d" #'agda2-remove-annotations
"q" #'agda2-quit "h" #'agda2-display-implicit-arguments
"r" #'agda2-restart)) "q" #'agda2-quit
"r" #'agda2-restart)))