 (defun ycmd-toggle-force-semantic-completion ()
   "Toggle whether to use always semantic completion.
 
-Returns the new value of `ycmd-force-semantic-completion`.
-"
+Returns the new value of `ycmd-force-semantic-completion'."
   (interactive)
   (let ((force (not ycmd-force-semantic-completion)))
     (message "ycmd: force semantic completion %s."



(defvar ycmd--log-enabled nil
  "Whether http content should be logged. This is useful for
  debugging.")

(defun ycmd--log-content (header content)
  (when ycmd--log-enabled
    (let ((buffer (get-buffer-create "*ycmd-content-log*")))
      (with-current-buffer buffer

              (ycmd--handle-goto-success location))))))))

(defun ycmd--send-goto-request (type buffer pos)
  "Send Go To request of TYPE to BUFFER at POS."
  (with-current-buffer buffer
    (goto-char pos)
    (let ((content (cons (list "command_arguments" type)
