summaryrefslogtreecommitdiff
path: root/elisp/geiser-company.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-08-25 15:30:51 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-08-25 15:30:51 +0200
commit98e199daf7b1a56179b670c192c7d244fcb2b323 (patch)
treeb6de0e0dabfc0d2b44972d0da34bf9c32bcff7d7 /elisp/geiser-company.el
parentf52ac22eb1c09f7eae9d53d7d12d15edac56f942 (diff)
downloadgeiser-chez-98e199daf7b1a56179b670c192c7d244fcb2b323.tar.gz
geiser-chez-98e199daf7b1a56179b670c192c7d244fcb2b323.tar.bz2
Slightly better autodoc caching (probably needs an overhaul, though).
Diffstat (limited to 'elisp/geiser-company.el')
-rw-r--r--elisp/geiser-company.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/elisp/geiser-company.el b/elisp/geiser-company.el
index 8ae8969..ef4ce38 100644
--- a/elisp/geiser-company.el
+++ b/elisp/geiser-company.el
@@ -38,7 +38,7 @@
(ignore-errors
(if module
(format "%s [module]" id)
- (geiser-autodoc--autodoc (list (list (intern id) 0))))))
+ (geiser-autodoc--autodoc (list (list (intern id) 0)) t))))
(defsubst geiser-company--doc-buffer (id module)
nil)
@@ -61,11 +61,11 @@
(defun geiser-company--setup (enable)
(setq geiser-company--enabled-flag enable)
+ (when (boundp 'company-lighter)
+ (setq company-lighter "/C"))
(when (fboundp 'company-mode)
(company-mode nil)
- (when enable (company-mode enable)))
- (when (boundp 'company-lighter)
- (setq company-lighter "/C")))
+ (when enable (company-mode enable))))
(defun geiser-company--inhibit-autodoc (ignored)
(setq geiser-autodoc--inhibit-flag t))