 
 (defvar ivy-height)
 
-(defun moo-select-candidate (candidates action &optional preselect)
+(defun moo-select-candidate (candidates action &optional preselect initial-input)
   (cond ((eq moo-select-method 'display-completion-list)
          (with-output-to-temp-buffer "*moo-jump*"
            (display-completion-list

                (ov (semantic-tag-overlay tag)))
            (ring-insert
             find-tag-marker-ring (point-marker))
            (find-file file-name)
            (goto-char (if (overlayp ov)
                           (overlay-start ov)
                         (aref ov 0)))))

  (define-key map (kbd "M-h") 'fa-idx-cycle-up)
  (define-key map (kbd "M-u") 'fa-abort)
  (define-key map (kbd "M-j") 'fa-jump-maybe)
  (define-key map (kbd "C-M-j") 'moo-jump-directory)
  (define-key map (kbd "C-M-k") 'moo-jump-local))

(defvar fa-overlay nil
  "Hint overlay instance.")
