diff options
| -rw-r--r-- | elisp/geiser-completion.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el index b58b6be..c1d1a0f 100644 --- a/elisp/geiser-completion.el +++ b/elisp/geiser-completion.el @@ -85,7 +85,8 @@ terminates a current completion." (defun geiser-completion--window-active-p () "Is the completion window currently active?" (and (window-live-p geiser-completion--completions-window) - (equal (buffer-name (window-buffer geiser-completion--completions-window)) + (equal (buffer-name + (window-buffer geiser-completion--completions-window)) geiser-completion--comp-buffer))) (defun geiser-completion--display-comp-list (completions base) |