contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[hydra] tweak Scheme implementation discovery

This commit is contained in:
contrapunctus 2021-08-11 23:27:06 +05:30
parent 8c6bbdf518
commit 451a7ed012
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
init.org
View File

@ -1723,9 +1723,9 @@ Don't try to check if there are files with a certain extension...it will lead to
(my-lilypond-hydra/body))
((and (featurep 'geiser)
(bound-and-true-p geiser-mode))
(cond ((equal 'chicken geiser-impl--implementation)
(cond ((eq 'chicken geiser-scheme-implementation)
(my-chicken-hydra/body))
((equal 'guile geiser-impl--implementation)
((eq 'guile geiser-scheme-implementation)
(cp-guile/body))
(t (error "Couldn't detect Scheme implementation."))))
((derived-mode-p 'lisp-mode 'slime-repl-mode)