   (setq merlin-error-after-save (not merlin-error-after-save))
   (if merlin-error-after-save
       (progn
-        (merlin-rewind)
         (merlin-after-save)
         (message "Errors are now reported. Use %s to stop reporting them."
                  (substitute-command-keys "\\[merlin-toggle-view-errors]")))

;;  (unless point (setq point (point)))
;;  (merlin-sync-to-point point)
;;  (cond
;;    ((merlin-phrase-goto 'next 0))
;;    ((progn (merlin-tell-definitions 2)
;;            (goto-char (merlin-seek-exact point))
;;            (merlin-phrase-goto 'next 0)))
;;    (t (goto-char (point-max)))))

(defun merlin-phrase-prev ()


;; SPECIAL CASE OF COMMANDS

(defun merlin-refresh ()
  "Refresh changed merlin cmis."
  (interactive)
  (merlin--acquire-buffer)
  (merlin-send-command 'refresh)
  (merlin-after-save))

