             (if (assoc-default 'exception result)
                 (ycmd--handle-exception
                  result exception-handler)
-              (funcall success-handler result))))))))
+              (when success-handler
+                (funcall success-handler result)))))))))
 
 (defun ycmd--send-completer-command-request (type buffer pos)
   "Send Go To request of TYPE to BUFFER at POS."

        (goto-line line)
        (forward-char (- col 1))
        (point)))))

(defun ycmd-show-documentation (&optional arg)
  "Show documentation for current point in buffer.

    (define-key map "s" 'ycmd-toggle-force-semantic-completion)
    (define-key map "v" 'ycmd-show-debug-info)
    (define-key map "d" 'ycmd-show-documentation)
    (define-key map "C" 'ycmd-clear-compilation-flag-cache)
    map)
  "Keymap for `ycmd-mode' interactive commands.")

