Lisp/Scheme dev enhancements

This commit is contained in:
Jeremy Dormitzer 2020-08-20 18:06:35 -04:00
parent 6fc81e1d9c
commit e842f3175a

View File

@ -1382,6 +1382,7 @@ Smartparens enables structured editing of s-expressions and other pairs:
(use-package smartparens
:hook ((prog-mode . smartparens-strict-mode)
(eshell-mode . smartparens-strict-mode)
(geiser-repl-mode . smartparens-strict-mode)
(inferior-python-mode . smartparens-strict-mode))
:init
(defhydra hydra-smartparens (:hint nil)
@ -2759,21 +2760,24 @@ Like [[help:electric-indent-mode][electric-indent-mode]] but reindents after eve
#+BEGIN_SRC emacs-lisp
(use-package aggressive-indent
:hook ((clojure-mode . aggressive-indent-mode)
(emacs-lisp-mode . aggressive-indent-mode)))
(emacs-lisp-mode . aggressive-indent-mode)
(lisp-mode . aggressive-indent-mode)
(scheme-mode . aggressive-indent-mode)))
#+END_SRC
* Indentation guides
#+BEGIN_SRC emacs-lisp
(use-package highlight-indent-guides
:commands highlight-indent-guides-mode
:hook ((python . highlight-indent-guides-mode))
:init
(leader-def-key "th" #'highlight-indent-guides-mode)
:custom
(highlight-indent-guides-method 'character)
(highlight-indent-guides-auto-character-face-perc 7)
(highlight-indent-guides-responsive 'stack)
(highlight-indent-guides-auto-stack-character-face-perc 10))
(use-package highlight-indent-guides
:commands highlight-indent-guides-mode
:hook ((python . highlight-indent-guides-mode)
(yaml . highlight-indent-guides-mode))
:init
(leader-def-key "th" #'highlight-indent-guides-mode)
:custom
(highlight-indent-guides-method 'character)
(highlight-indent-guides-auto-character-face-perc 7)
(highlight-indent-guides-responsive 'stack)
(highlight-indent-guides-auto-stack-character-face-perc 10))
#+END_SRC
* JSON
@ -3444,6 +3448,9 @@ Tell emacs about file extensions which should activate scheme-mode:
'(guile racket chicken chez mit chibi gambit)
:initial-value nil))
:general
(geiser-mode-map 'normal
"M-." 'geiser-edit-symbol-at-point
"M-," 'geiser-pop-symbol-stack)
(geiser-debug-mode-map "SPC" leader-map))
#+END_SRC
@ -3462,14 +3469,16 @@ And a handy shortcut to hop into a Geiser REPL:
:commands (slime)
:config
(setq inferior-lisp-program
(executable-find "sbcl")
slime-contribs '(slime-repl
slime-fancy
slime-company))
(executable-find "sbcl")
slime-contribs '(slime-repl
slime-fancy
slime-company))
(when (file-exists-p
(expand-file-name "~/quicklisp/slime-helper.el"))
(expand-file-name "~/quicklisp/slime-helper.el"))
(load (expand-file-name "~/quicklisp/slime-helper.el")))
(add-hook 'slime-repl-mode-hook 'smartparens-strict-mode)
(add-to-list 'browse-url-browser-function
'("lispworks.com/documentation/HyperSpec" . w3m-browse-url))
:general
((normal motion visual insert emacs) slime-mode-map "M-." #'slime-edit-definition))