                              (list ycmd-server-command)))
            (args (list (concat "--options_file=" options-file)))
            (server-program+args (append server-command args))
-           (proc (apply #'start-process "ycmd-server" proc-buff server-program+args))
+           (proc (apply #'start-process ycmd-server-process proc-buff server-program+args))
            (cont 1))
       (while cont
         (set-process-query-on-exit-flag proc nil)

	   ((string-match "^serving on http://.*:\\\([0-9]+\\\)$" proc-output)
	    (progn
              (set-variable 'ycmd-server-actual-port
                            (string-to-number (match-string 1 proc-output)))c
              (setq cont nil)))
	   (t
	    (incf cont)

(require 'hmac-def)
(require 'hmac-md5) ; provides encode-hex-string
(require 'json)
(require 'request)

