           (funcall
            cb
            (company-ycmd--construct-candidates
-            (assoc-default 'completions c) prefix)))))))
+	    (assoc-default 'completion_start_column c)
+            (assoc-default 'completions c)
+	    prefix)))))))
 
 (cl-defun company-ycmd--fontify-code (code &optional (mode major-mode))
   "Fontify CODE."

Takes a ycmd completion structure SRC,
extracts the 'insertion_text', attaches other properties to that
string as text-properties, and returns the string."
  (let ((candidate (substring-no-properties
                    (assoc-default 'insertion_text src))))

    (put-text-property 0 1 'meta meta candidate)
    (when (and meta
               (string-match

           (company-ycmd--in-include))
       (or (and (not (ycmd-parsing-in-progress-p))
                (company-grab-symbol-cons "\\.\\|->\\|::" 2))

           'stop)))

(defun company-ycmd--candidates (prefix)
