summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-13 04:40:31 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-13 04:42:31 +0100
commit579bf848c75cb2f4920227c2ac2a4535eb676eca (patch)
tree421ceefdbc43badd12f3bd993f2c438d61390226 /elisp
parent102d79f1af0aa0ec1acfa4ff30d4d9897663a4e8 (diff)
downloadgeiser-chez-579bf848c75cb2f4920227c2ac2a4535eb676eca.tar.gz
geiser-chez-579bf848c75cb2f4920227c2ac2a4535eb676eca.tar.bz2
completion-base-position <- completion-base-size
The latter is obsolete since 23.2.
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-completion.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el
index f88fae6..b33c976 100644
--- a/elisp/geiser-completion.el
+++ b/elisp/geiser-completion.el
@@ -93,7 +93,7 @@ terminates a current completion."
(display-completion-list completions base)
(let ((offset (- (point) 1 (length base))))
(with-current-buffer standard-output
- (setq completion-base-size offset)
+ (setq completion-base-position (list offset nil))
(set-syntax-table scheme-mode-syntax-table))))
(when savedp
(setq geiser-completion--completions-window
@@ -283,8 +283,5 @@ and will try completing symbol at point otherwise."
:group 'geiser-mode
:keymap `((,(kbd "TAB") . geiser-completion--maybe-complete)))
-
-
(provide 'geiser-completion)
-;;; geiser-completion.el ends here