diff options
| author | jao <jao@gnu.org> | 2022-03-06 17:55:53 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-03-06 17:55:53 +0000 |
| commit | 2add7137ec813137fec044c3bae6e74bfb983669 (patch) | |
| tree | 1b9d92e6e7ac9bb81203683f2a7a9766e1f192da /elisp/geiser-repl.el | |
| parent | a996559ac34fe93ce9a448b23b7a9fbc23c002eb (diff) | |
| download | geiser-2add7137ec813137fec044c3bae6e74bfb983669.tar.gz geiser-2add7137ec813137fec044c3bae6e74bfb983669.tar.bz2 | |
Depend on project 0.8.1, for users of emacs < 28
Fixes issue #37.
Diffstat (limited to 'elisp/geiser-repl.el')
| -rw-r--r-- | elisp/geiser-repl.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index bb91d7a..2156ff6 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -29,6 +29,7 @@ (require 'compile) (require 'scheme) (require 'font-lock) +(require 'project) ;;; Customization: @@ -55,9 +56,8 @@ used to discover a buffer's project." (declare project-current "project.el") (defun geiser-repl-project-root () - "Use project.el, when available, to determine a buffer's project root." - (when (featurep 'project) - (when-let (p (project-current)) (project-root p)))) + "Use project.el, to determine a buffer's project root." + (when-let (p (project-current)) (project-root p))) (geiser-custom--defcustom geiser-repl-current-project-function #'geiser-repl-project-root @@ -65,8 +65,8 @@ used to discover a buffer's project." The function is called from both source and REPL buffers, and should return a value which uniquely identifies the project." :type '(choice (function-item :tag "Ignore projects" ignore) - (function-item :tag "Use Project.el" geiser-repl-project-root) - (function-item :tag "Use Projectile" projectile-project-root) + (function-item :tag "Use project.el" geiser-repl-project-root) + (function-item :tag "Use projectile" projectile-project-root) (function :tag "Other function"))) (geiser-custom--defcustom geiser-repl-use-other-window t |