marcuskammer/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move scheme packages to lisp package

Browse source
This commit is contained in:
Marcus Kammer 2024-03-27 19:43:35 +01:00
parent ec357eb8bf
commit d110aaddba
2 changed files with 29 additions and 29 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
bundle/bundle--lisp.el
View file

@ -332,3 +332,32 @@ 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))
(use-package racket-mode
:mode "\\.rkt\\'")
(use-package geiser-racket
:defer t
:after geiser
:config
(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")))

29
bundle/bundle--package.el
View file

@ -218,40 +218,11 @@
;; :hook (typescript-mode . eglot-ensure)
;; :config (setq typescript-indent-level 2))
(use-package geiser
:defer t
: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))
(use-package racket-mode
:mode "\\.rkt\\'")
(use-package geiser-racket
:defer t
:after geiser
:config
(when (eq system-type 'windows-nt)
(setq geiser-racket-binary "c:/Program Files/Racket/Racket.exe")))
(when (eq system-type 'gnu/linux)
(use-package spotify :bind ("S-<pause>" . spotify-playpause))
;; (use-package clojure-mode)
;; (use-package cider)
(use-package geiser-guile
:defer t
:after geiser
:custom (geiser-guile-binary "guile"))
(use-package journalctl-mode
:commands journalctl
:bind (("C-c t j" . journalctl))))