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

Fix common-lisp local leader prefix labels

Browse source
This commit is contained in:
Michael Fiano 2019-03-28 19:05:52 -04:00
parent 132ad7d391
commit 9519003bcd
1 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

19
modules/lang/common-lisp/config.el
View file

@ -77,9 +77,9 @@ bin/doom while packages at compile-time (not a runtime though)."
(advice-add #'sly-check-version :before #'+common-lisp*refresh-sly-version) (advice-add #'sly-check-version :before #'+common-lisp*refresh-sly-version)
(map! :localleader (map! :localleader
:map sly-mode-map :map lisp-mode-map
"'" #'sly "'" #'sly
(:prefix "g" (:prefix ("g" . "go")
"b" #'sly-pop-find-definition-stack "b" #'sly-pop-find-definition-stack
"d" #'sly-edit-definition "d" #'sly-edit-definition
"D" #'sly-edit-definition-other-window "D" #'sly-edit-definition-other-window
@ -87,7 +87,7 @@ bin/doom while packages at compile-time (not a runtime though)."
"N" #'sly-previous-note "N" #'sly-previous-note
"s" #'sly-stickers-next-sticker "s" #'sly-stickers-next-sticker
"S" #'sly-stickers-prev-sticker) "S" #'sly-stickers-prev-sticker)
(:prefix "h" (:prefix ("h" . "help")
"<" #'sly-who-calls "<" #'sly-who-calls
">" #'sly-calls-who ">" #'sly-calls-who
"~" #'hyperspec-lookup-format "~" #'hyperspec-lookup-format
@ -102,36 +102,36 @@ bin/doom while packages at compile-time (not a runtime though)."
"r" #'sly-who-references "r" #'sly-who-references
"s" #'sly-who-specializes "s" #'sly-who-specializes
"S" #'sly-who-sets) "S" #'sly-who-sets)
(:prefix "c" (:prefix ("c" . "compile")
"c" #'sly-compile-file "c" #'sly-compile-file
"C" #'sly-compile-and-load-file "C" #'sly-compile-and-load-file
"f" #'sly-compile-defun "f" #'sly-compile-defun
"l" #'sly-load-file "l" #'sly-load-file
"n" #'sly-remove-notes "n" #'sly-remove-notes
"r" #'sly-compile-region) "r" #'sly-compile-region)
(:prefix "e" (:prefix ("e" . "evaluate")
"b" #'sly-eval-buffer "b" #'sly-eval-buffer
"e" #'sly-eval-last-expression "e" #'sly-eval-last-expression
"E" #'sly-eval-print-last-expression "E" #'sly-eval-print-last-expression
"f" #'sly-eval-defun "f" #'sly-eval-defun
"F" #'sly-undefine-function "F" #'sly-undefine-function
"r" #'sly-eval-region) "r" #'sly-eval-region)
(:prefix "m" (:prefix ("m" . "macro")
"e" #'+common-lisp/macrostep/body "e" #'+common-lisp/macrostep/body
"E" #'macrostep-expand) "E" #'macrostep-expand)
(:prefix "r" (:prefix ("r" . "repl")
"c" #'sly-mrepl-clear-repl "c" #'sly-mrepl-clear-repl
"q" #'sly-quit-lisp "q" #'sly-quit-lisp
"r" #'sly-restart-inferior-lisp "r" #'sly-restart-inferior-lisp
"s" #'sly-mrepl-sync) "s" #'sly-mrepl-sync)
(:prefix "s" (:prefix ("s" . "stickers")
"b" #'sly-stickers-toggle-break-on-stickers "b" #'sly-stickers-toggle-break-on-stickers
"c" #'sly-stickers-clear-defun-stickers "c" #'sly-stickers-clear-defun-stickers
"C" #'sly-stickers-clear-buffer-stickers "C" #'sly-stickers-clear-buffer-stickers
"f" #'sly-stickers-fetch "f" #'sly-stickers-fetch
"r" #'sly-stickers-replay "r" #'sly-stickers-replay
"s" #'sly-stickers-dwim) "s" #'sly-stickers-dwim)
(:prefix "t" (:prefix ("t" . "trace")
"t" #'sly-toggle-trace-fdefinition "t" #'sly-toggle-trace-fdefinition
"T" #'sly-toggle-fancy-trace "T" #'sly-toggle-fancy-trace
"u" #'sly-untrace-all)) "u" #'sly-untrace-all))
@ -243,7 +243,6 @@ bin/doom while packages at compile-time (not a runtime though)."
"q" 'quit-window "q" 'quit-window
"r" 'sly-xref-retract))) "r" 'sly-xref-retract)))
(def-package! sly-repl-ansi-color (def-package! sly-repl-ansi-color
:defer t :defer t
:init :init