   "ELDoc backend for intero."
   (apply #'intero-get-type-at-async
          (lambda (beg end ty)
-           (let ((response-status (haskell-utils-repl-response-error-status ty)))
+           (let ((response-status (intero-haskell-utils-repl-response-error-status ty)))
              (if (eq 'no-error response-status)
                (let ((msg (intero-fontify-expression
                            (replace-regexp-in-string "[ \n]+" " " ty))))

         (intero-thing-at-point))
  ;; If we have something cached at point, print that first:
  (gethash (intero-thing-at-point) eldoc-intero-cache))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; REPL

(require 'company)
(require 'comint)
(require 'widget)
(require 'eldoc)
(eval-when-compile
  (require 'wid-edit))

