 (defvar-local merlin--project-cache nil "Cache for merlin--project-get")
 (defvar-local merlin--project-failures nil
   "When loading .merlin, list of errors reported. Only update error messages if
-  error list changes")
+error list changes")
 
 ;;;;;;;;;;;
 ;; UTILS ;;

                   (substitute-command-keys "\\[merlin-error-next]"))
        (message "No errors")))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; COMPLETION-AT-POINT SUPPORT ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defun merlin--completion-format-entry (entry)
  "Format the completion entry ENTRY."

          (setq d d-) (setq err err-))))))

(defun merlin-show-error-on-current-line ()
  "Show the error of the current line in the echo area.  If there is no error, do nothing."
  (when (and merlin-mode (not (current-message)))
    (let* ((errors (overlays-in (line-beginning-position) (line-end-position)))
           (err nil))
