   "Compute the prefix of IDENT.  The prefix of `Foo.bar' is `Foo.' and the prefix of `bar' is `'."
   (car (merlin--completion-split-ident ident)))
 
-(defvar-local dwimed nil
+(defvar-local merlin--dwimed nil
   "Remember if we used dwim for the current completion or not")
 
 (defun merlin--completion-full-entry-name (compl-prefix entry)
   (let ((entry-name (cdr (assoc 'name entry))))
-    (if dwimed entry-name (concat compl-prefix entry-name))))
+    (if merlin--dwimed entry-name (concat compl-prefix entry-name))))
 
 (defun merlin--completion-prepare-labels (labels suffix)
   ; Remove non-matching entry, adjusting optional labels if needed

    (lambda (errors)
      (merlin-error-reset)
      (let ((no-loc (remove-if (lambda (e) (assoc 'start e)) errors)))
        (setq errors (remove-if (lambda (e) (not (assoc 'start e))) errors))
        (unless merlin-report-warnings
          (setq errors (remove-if (lambda (e)
                                    (merlin-error-warning-p (cdr (assoc 'message e))))
                                  errors)))
        (when (or errors no-loc)
          (setq merlin-erroneous-buffer t)
          (when no-loc
            (mapcar (lambda (e) (message "%s" (cdr (assoc 'message e)))) no-loc))
          (when errors
            (merlin-transform-display-errors errors)))))))

(defun merlin--error-check (view-errors-p)
  "Check for errors.

    (when (and merlin-completion-dwim (not labels) (not entries))
      (setq data (merlin-send-command `(expand prefix ,ident at ,pos)))
      (setq entries (cdr (assoc 'entries data)))
      (setq-local merlin--dwimed t)
      (setq prefix ""))
    ; Concat results
    (let ((result (append labels entries)))
