add support for company-mode jump to location in robe-complete-at-point

[stardiviner]

company-mode has a keybinding to jump to candidate location, and company-mode use company-capf for completion-at-point-functions and robe-complete-at-point.
robe-complete-at-point has annotation support already. I hope robe can add robe-jump to in completion function as support.

Thanks in advance.

[dgutov]

I will. You can use company-robe in the meantime.

[stardiviner]

I try to add by myself.

(defun robe-complete-at-point ()
  (when robe-running
    (let ((bounds (bounds-of-thing-at-point 'symbol))
          (fn (if (fboundp 'completion-table-with-cache)
                  (completion-table-with-cache #'robe-complete-thing)
                (completion-table-dynamic #'robe-complete-thing))))
      (when (robe-complete-symbol-p (or (car bounds) (point)))
        (if bounds
            (list (car bounds) (cdr bounds) fn
                  :annotation-function #'robe-complete-annotation
                  :company-location #'robe-jump
                  :exit-function #'robe-complete-exit)
          (list (point) (point) fn
                :annotation-function #'robe-complete-annotation
                :company-location #'robe-jump
                :exit-function #'robe-complete-exit))))))

But it does not work, can't jump directly. Maybe need to exit company popup menu at first?

[dgutov]

robe-jump does not return the right value for :company-location.