Enable geiser and guile for linux

This commit is contained in:
Marcus Kammer 2024-08-03 15:24:50 +02:00
parent 9e018101ff
commit d57ef32eb8
Signed by: marcuskammer
GPG key ID: C374817BE285268F

View file

@ -339,18 +339,14 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(use-package common-lisp-snippets
:after yasnippet)
;; (use-package geiser
;; :init
;; (setq geiser-repl-prompt-read-only t)
;; (setq geiser-repl-highlight-error-messages t)
;; (if (eq system-type 'windows-nt)
;; (progn
;; (setq geiser-active-implementations '(racket))
;; (setq geiser-default-implementation 'racket))
;; (progn
;; (setq geiser-active-implementations '(racket guile))
;; (setq geiser-default-implementation 'guile)))
;; :hook (scheme-mode . geiser-mode))
(when (eq system-type 'gnu/linux)
(use-package geiser
:init
(setq geiser-repl-prompt-read-only t)
(setq geiser-repl-highlight-error-messages t)
(setq geiser-active-implementations '(racket guile))
(setq geiser-default-implementation 'guile)
:hook (scheme-mode . geiser-mode)))
;; (use-package racket-mode
;; :mode "\\.rkt\\'")
@ -362,11 +358,11 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
;; (when (eq system-type 'windows-nt)
;; (setq geiser-racket-binary "c:/Program Files/Racket/Racket.exe")))
;; (when (eq system-type 'gnu/linux)
;; (use-package geiser-guile
;; :defer t
;; :after geiser
;; :custom (geiser-guile-binary "guile")))
(when (eq system-type 'gnu/linux)
(use-package geiser-guile
:defer t
:after geiser
:custom (geiser-guile-binary "guile")))
(use-package ac-slime
:after (slime auto-complete)