From 599ab41d95ec61b0458b0fe3301fbc7a34947239 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Mon, 5 Dec 2022 18:56:42 -0500 Subject: emacs: Remove geiser hack that recent versions make unnecessary. --- dotfiles/.emacs.d/init.el | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el index d168e85..629ea0b 100644 --- a/dotfiles/.emacs.d/init.el +++ b/dotfiles/.emacs.d/init.el @@ -303,17 +303,6 @@ might be bad." (use-package flycheck-guile :config (add-hook 'scheme-mode-hook #'flycheck-mode)) - ;; Use project-aware REPL buffer naming so it's clear which REPL - ;; belongs to which project. - (defun repl-buffer-name (impl) - (let ((repl-name (geiser-repl--repl-name impl)) - (current-project (funcall geiser-repl-current-project-function))) - (if (and geiser-repl-per-project-p current-project) - (let ((project-name (file-name-nondirectory - (directory-file-name current-project)))) - (format "*Geiser %s: %s*" repl-name project-name)) - (format "*Geiser %s*" repl-name)))) - (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))) -- cgit v1.2.3