company: Release 0.6.10

[gnu-emacs-elpa] / packages / company / company-semantic.el

diff --git a/packages/company/company-semantic.el b/packages/company/company-semantic.el
index 92cd178e3985861244e6d99147f67579e6263513..796cc9ec08aab217182ccf12502a7972d343791e 100644 (file)
--- a/packages/company/company-semantic.el
+++ b/packages/company/company-semantic.el
@@ -74,11 +74,10 @@
 (defun company-semantic-doc-buffer (tag)
   (let ((doc (semantic-documentation-for-tag tag)))
     (when doc
-      (with-current-buffer (company-doc-buffer)
-        (insert (funcall semantic-idle-summary-function tag nil t)
-                "\n"
-                doc)
-        (current-buffer)))))
+      (company-doc-buffer
+       (concat (funcall semantic-idle-summary-function tag nil t)
+               "\n"
+               doc)))))
 
 (defsubst company-semantic-completions (prefix)
   (ignore-errors