   "Go to the beginning of the next phrase."
   (interactive)
   (save-excursion
-    (merlin-check-synchronize t)
+    (merlin-check-synchronize)
     (merlin-goto-phrase "current" 1)
     (forward-line 1)
-    (merlin-check-synchronize t))
+    (merlin-check-synchronize))
   (merlin-goto-phrase "next" 0))
 
 (defun merlin-prev-phrase ()
   "Go to the beginning of the previous phrase."
   (interactive)
-  (merlin-check-synchronize t)
+  (merlin-check-synchronize)
   (merlin-goto-phrase "prev" 0))
     
 (defun merlin-to-point ()

(defun merlin-show-type-of-region ()
  "Show the type of the region."
  (interactive)
  (merlin-check-synchronize t)
  (merlin-show-type (cons (region-beginning) (region-end))))
(defun merlin-show-type-of-point-quiet ()
  "Show the type of the identifier under the point if it is short (a value)."

        (message "%s%s" (car ret) (cdr ret)))))
(defun merlin-completion-at-point ()
  (save-excursion
    (merlin-check-synchronize))
  (save-excursion
    (skip-syntax-backward "w_.")
    (let ((start (point)))
