diff options
| author | jao <jao@gnu.org> | 2020-12-02 18:51:41 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-12-02 18:51:41 +0000 |
| commit | 701aab2db64690e1f42725d6163291e4e0878ad2 (patch) | |
| tree | a37a6ae03be9cdd1927821bea1a1f1c900643f14 | |
| parent | 5f0fa551c65ecd0a1f096b59a1430b413e9f7faa (diff) | |
| download | geiser-701aab2db64690e1f42725d6163291e4e0878ad2.tar.gz geiser-701aab2db64690e1f42725d6163291e4e0878ad2.tar.bz2 | |
Placate byte compiler (Brian Leung)
| -rw-r--r-- | elisp/geiser-debug.el | 2 | ||||
| -rw-r--r-- | elisp/geiser-doc.el | 2 | ||||
| -rw-r--r-- | elisp/geiser-repl.el | 2 |
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)) |