added standard hydra intero maps
This commit is contained in:
parent
c9cb210d16
commit
6ab2bd2512
34
conf.org
34
conf.org
|
@ -3594,24 +3594,24 @@ The only thing I like about elpy is the interactive shell
|
||||||
*** haskell
|
*** haskell
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(with-eval-after-load 'intero
|
(with-eval-after-load 'intero
|
||||||
(nd/hydra-standard-int intero-mode-map
|
(nd/hydra-standard-int
|
||||||
(:send-line intero-repl-eval-region)
|
intero-mode-map
|
||||||
;; TODO add a go function here
|
(:send-line . intero-repl-eval-region)
|
||||||
;; TODO add group functions
|
;; TODO add a go function here
|
||||||
(:send-buffer intero-repl-load)
|
;; TODO add group functions
|
||||||
;; TODO add kill repl function
|
(:send-buffer . intero-repl-load)
|
||||||
(:shell-start intero-repl))
|
;; TODO add kill repl function
|
||||||
|
(:shell-start . intero-repl))
|
||||||
|
|
||||||
(defhydra hyd-haskell-nav (intero-mode-map "M-n" :exit t)
|
(nd/hydra-standard-nav
|
||||||
"haskell query commands"
|
intero-mode-map
|
||||||
("M-n" intero-goto-definition)
|
(:def-at . intero-goto-definition)
|
||||||
;; TODO add other window
|
;; TODO add other window
|
||||||
;; TODO expand-at-slice and apply suggestion
|
;; TODO expand-at-slice and apply suggestion
|
||||||
|
(:ref-at . intero-uses-at)
|
||||||
("r" intero-uses-at)
|
(:type-at . intero-type-at)
|
||||||
("t" intero-type-at)
|
(:pop-marker-stack . xref-pop-marker-stack)
|
||||||
("b" xref-pop-marker-stack)
|
(:doc-at . intero-info)))
|
||||||
("?" intero-info)))
|
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** magit
|
*** magit
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
|
Loading…
Reference in New Issue