diff options
| author | David Thompson <dthompson2@worcester.edu> | 2022-08-29 20:58:46 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2022-08-29 20:58:46 -0400 |
| commit | c5a431c3b7a6833d90f2f7a1a0ac310cecfaa2fc (patch) | |
| tree | 7ff4280a78da169f1db78c51d701a47ac0c7cadf | |
| parent | 62e0f492b3c489e3eba19a3294dce43cc9cdb8e8 (diff) | |
Update Emacs config.
| -rw-r--r-- | dotfiles/.emacs.d/init.el | 25 |
1 files changed, 22 insertions, 3 deletions
diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el index d53360d..f418073 100644 --- a/dotfiles/.emacs.d/init.el +++ b/dotfiles/.emacs.d/init.el @@ -279,12 +279,29 @@ might be bad." :config (add-hook 'emacs-lisp-mode-hook (lambda () (paredit-mode t))) (add-hook 'lisp-mode-hook (lambda () (paredit-mode t))) + (add-hook 'lisp-data-mode-hook (lambda () (paredit-mode t))) (add-hook 'lisp-interaction-mode-hook (lambda () (paredit-mode t))) (add-hook 'scheme-mode-hook (lambda () (paredit-mode t)))) (use-package geiser - :config (use-package geiser-guile) - :custom ((geiser-active-implementations '(guile)))) + :config + (use-package geiser-guile) + ;; Use project-aware REPL buffer naming so it's clear which REPL + ;; belongs to which project. + (defun repl-buffer-name (impl) + (if geiser-repl-per-project-p + (format "*Geiser %s: %s*" + (geiser-repl--repl-name impl) + (file-name-nondirectory + (directory-file-name + (funcall geiser-repl-current-project-function)))) + (format "*Geiser %s*" (geiser-repl--repl-name impl)))) + (setq geiser-repl-buffer-name-function #'repl-buffer-name) + :custom ((geiser-active-implementations '(guile)) + ;; One REPL per project, please! + (geiser-repl-per-project-p t))) + +(use-package flycheck-guile) ;; Use scheme-mode for Skribe documents. (add-to-list 'auto-mode-alist '("\\.skr$" . scheme-mode)) @@ -412,7 +429,9 @@ indentation." (erc-kill-server-buffer-on-quit t) (erc-server-coding-system '(utf-8 . utf-8)) (erc-autojoin-channels-alist - '(("libera.chat" "#gnuassembly" "#guile" "#guix" "#lispgames" "#chickadee"))) + '(("libera.chat" + "#gnuassembly" "#guile" "#guile-steel" "#guix" "#lispgames" + "#chickadee"))) ;; Don't open channel buffers in place of the current ;; buffer because that drives me fucking crazy. (erc-join-buffer 'bury) |