mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity

Geiser: Load patch-geiser properly

master
Pierre Neidhardt 2019-03-08 09:22:53 +01:00
parent f8a5ab0330
commit 763fc7b25f
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
.emacs.d/lisp/init-lisp.el
View File

@ -156,10 +156,7 @@
(clhs-setup)))
;;; Scheme.
;; (setq geiser-repl-skip-version-check-p t
;; geiser-mode-start-repl-p t)
(with-eval-after-load 'scheme
(require 'patch-geiser nil 'noerror)
(when (require 'patch-scheme nil t)
(setq scheme-imenu-generic-expression
al/scheme-imenu-generic-expression)
@ -168,12 +165,16 @@
(add-hook 'scheme-mode-hook 'al/scheme-fix-docstring-font-lock)))
(with-eval-after-load 'geiser-impl
(setq geiser-active-implementations
(delq 'chicken geiser-active-implementations)
;; (setq geiser-repl-skip-version-check-p t
;; geiser-mode-start-repl-p t)
(setq geiser-active-implementations (delq 'chicken geiser-active-implementations)
geiser-default-implementation 'guile
;; geiser-repl-save-debugging-history-p t
geiser-repl-history-size 5000)
(add-hook 'geiser-repl-mode-hook 'lispyville-mode)
(add-hook 'geiser-repl-mode-hook 'rainbow-delimiters-mode))
(with-eval-after-load 'geiser-guile
(require 'patch-geiser nil 'noerror))
(provide 'init-lisp)