   :group 'merlin :type 'string)
 
 (defcustom merlin-type-buffer-name "*merlin-types*"
+  "The name of the buffer storing module signatures."
+  :group 'merlin :type 'string)
+
+(defcustom merlin-error-buffer-name "*merlin-errors*"
   "The name of the buffer storing module signatures."
   :group 'merlin :type 'string)
 

  (merlin-switch-to name '(".mli" ".ml")))

;;;;;;;;;;;;;;;;;;
;; ERROR REPORT ;;
;;;;;;;;;;;;;;;;;;


                         (= (point) (cdr merlin--last-edit)))))
        (setq errors (remove nil (mapcar 'merlin--overlay-pending-error errors)))
        (setq err (merlin--error-at-position (point) errors))
        (when err (merlin--error-display (cdr (assoc 'message err))))))))

(defun merlin--overlay-next-property-set (point prop &optional limit)
  "Find next point where PROP is set.
