summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-repl.el')
-rw-r--r--elisp/geiser-repl.el10
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