summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--elisp/geiser-debug.el2
-rw-r--r--elisp/geiser-doc.el2
-rw-r--r--elisp/geiser-repl.el2
3 files changed, 6 insertions, 0 deletions
diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el
index d2e91ec..ca51748 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -136,6 +136,8 @@ buffer.")
(newline 2)
(and no (> no 0))))))
+(declare-function switch-to-geiser "geiser-repl")
+
(defun geiser-debug--display-retort (what ret &optional res auto-p)
(let* ((err (geiser-eval--retort-error ret))
(key (geiser-eval--error-key err))
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index d7210f6..edd6dab 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -288,6 +288,8 @@ help (e.g. browse an HTML page) implementing this method.")
map)
"Keymap for `geiser-doc-mode'.")
+(declare-function switch-to-geiser "geiser-repl")
+
(defun geiser-doc-switch-to-repl ()
(interactive)
(switch-to-geiser nil nil (current-buffer)))
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index a576beb..c41f05d 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -515,6 +515,8 @@ module command as a string")
(when (and v r (geiser--version< v r))
(error "Geiser requires %s version %s but detected %s" impl r v)))))
+(defvar geiser-repl--last-scm-buffer)
+
(defun geiser-repl--start-repl (impl address)
(message "Starting Geiser REPL ...")
(when (not address) (geiser-repl--check-version impl))