Merge pull request #3416 from flatwhatson/scheme-fixes
Minor scheme module improvements
This commit is contained in:
commit
fdbfae30ed
2 changed files with 4 additions and 2 deletions
|
@ -69,6 +69,8 @@
|
|||
[escape] #'View-quit-all)
|
||||
(:after man :map Man-mode-map
|
||||
:n "q" #'kill-current-buffer)
|
||||
(:after geiser-doc :map geiser-doc-mode-map
|
||||
:n "o" #'link-hint-open-link)
|
||||
|
||||
(:after (evil-org evil-easymotion)
|
||||
:map evil-org-mode-map
|
||||
|
|
|
@ -6,7 +6,7 @@
|
|||
|
||||
|
||||
(use-package! geiser
|
||||
:hook (scheme-mode . geiser-mode)
|
||||
:defer t
|
||||
:init
|
||||
(setq geiser-active-implementations '(guile chicken mit chibi chez)
|
||||
geiser-autodoc-identifier-format "%s → %s"
|
||||
|
@ -25,7 +25,7 @@
|
|||
("^\\*Geiser dbg\\*$" :slot 1 :vslot -1)
|
||||
("^\\*Geiser xref\\*$" :slot 1 :vslot -1)
|
||||
("^\\*Geiser documentation\\*$" :slot 2 :vslot 2 :select t :size 0.35)
|
||||
("^\\* [A-Za-z0-9_-]+ REPL \\*$" :quit nil :ttl nil)))
|
||||
("^\\* [A-Za-z0-9_-]+ REPL \\*" :size 0.3 :quit nil :ttl nil)))
|
||||
(map! :localleader
|
||||
:map scheme-mode-map
|
||||
"'" #'geiser-mode-switch-to-repl
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue